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BBC to Archimedes Program Conversion 

Variable/procedure cross-referencer for BASIC V 














-. .. ' ' I 

Hail the Conqueror! 

My review copy of Conqueror arrived the other day. My first reaction, when 
1 saw that it was all about tank warfare was that I did not like the idea at all, 
especially in the light of the Hungerford massacre and similar atrocities. Why 
do so many computer games involve the shoot ’em up mentallity? 

Underpressure from the kids, I tried it out. As a piece of simulation software, 
it really is very impressive, including sampled sounds, courtesy of Armadillo. 

It is also more than just a straight us versus them battle; it involves quite a bit 
of strategic thinking. 

Then I realised that if 1 reviewed it in this issue of Archive and got Conqueror 
in stock, being the first such review available, I could sell quite a large number 
of programs at £20+. A very attractive proposition! 

Then I had a word with the Boss about it - He didn’t say “No!” (He’s good like 
that.) but I still felt a bit uneasy about the whole tiring, so I decided in the end 
not to stock it after all. 

k -=.. = J 
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Hardware & Software Available 



* Artisan Support Disc, Clares’ have just 
released a support disc for Artisan users. 
Amongst other things, it provides 6 extra fonts, 
extra colour fill patterns, an editor for changing 
the colour patterns on the monochrome printer 
dumps, printer dumps for Tntegrex 132 and 
Epson EX800, JX80, Fujitsu DL3400 and Star 
LOO colour printers and a module which 
provides a way of merging pictures (including a 
fastload module) — you can make up a very 
impressive Artisan “slide-show” - and you get 
four new sample screens to impress yourfriends. 
(In stock and available through Archive for£l 8) 
The Integrex screen dumps arc very impressive 
as visitors to the Manchester M.U. Show will be 
able to testify, especially when printed on the 
special paper which Clares Micros can supply 
for £5 per 25m roll, 

* New version (1,5a) of Arctist available - still 
at £19.95 (£18 through Archive). Now has the 
following extra features: Select colour & tint 
from palette or an area on-screen (be. re-select 
an existing colour), finish a line or ray by 
pressing space then re start elsewhere without re¬ 
selecting die function, select a new colour while 
still in a function, fill a given colour area with a 
new tint level, block move straight or EOR 
overlap, clear screen to a selected colour, delete 
text from the keyboard, make use of twin drives, 
rotate through palettes, select a new palette. 

This new version is available as a FREE 
UPGRADE to existing users (Acorn, please 
note!). There are also Eeonet and hard-disc 
versions available — telephone Fairhurst 
Instruments for details. 

* 5.25 11 disc drive Interface* All you ever 
wanted to do with a 5.25" disc drive on the 
Archimedes from CJE Micro’s... Firstly an 
interface cable for £30. Then there is a link¬ 


swapping switch for £8 that will allow the 
external drive to be :0 (or, more importantly, A: 
on MS.DOS). Then there’s a Drive Select 
Translation Cable for an extra £9 which allows 
you to leave die links on die external drive set to 
zero (so you can swap die drive over with 
another computer, e.g. a BBC) and still have it 
accessed from the Archimedes as if it were 
drives 1 and 2 (or diere is a version that makes it 
2 and 3). If you can’t work out what you need 
from that lot, give CJE a ring! Then there is some 
software for £ 15 that allows you to read (but not 
write) DFS discs using the Archimedes — much 
easier than trying to use the RS423 interface - 
particularly u seful for those who want to trade in 
their BBC’s for an Archimedes! (All these 
prices are including VAT) 

* Ar t-Wor ker (£5) f rom M ac Soft i s a “creati ve 
art program” providing a spray brush for 
creating mode 15 (256 colour) pictures. 

* Mode Converter + Serial Data Transfer 
System, (£13 + VAT) from M & M Computers 
provides a way of getting all those favourite 
screen-shots (or other files for that matter) 
across from the BBC to the Archimedes. Once 
across, the mode converter will allow you to 
transfer screens from one mode to another so 
dial, for example, 16 colour BBC pictures can 
have a bit more colour added. (M & M are 
moving into new offices, so for information, 
please contact the author, Alan Barclay at 7 
Porthill Court, Aberdeen, AB1 1DU.) 

* Ardiitext - a text editor from HopeSoft for 
use with C Pascal, Fortran, assembler and 
BASIC programming - £19.90. We have a 
review copy though it is “not the final version” 
but you can get a demo version which allows you 
to do everything except save files for just £3.50 
(refundable when you buy the full program). 
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Hardware and Software Available 


Architect uses the mouse but not the WIMP 
environment to make it “fast and full of 
facilities, but easy to use,”) 

* Backgammon on your desktop - Maximum 
have released a desk accessory version of the 
popular board game, backgammon with save, 
load, wind and re-wind facilities for just £9.50- 
You can play the computer or the computer can 
plays itself! 

* AutoSketch (£79 + VAT) - a new precision 
drawing package for machines with 1Mbyte 
upwards is object-oriented with lines, arcs, 
circles and curves of different colours and line 
types which can be assigned to any of ten 
drawing layers. Text of any size can be added 
and objects can be measured and dimensioned 


automatically. It has full zoom facilities, is 
mouse driven and works with a whole range of 
printers and pen-plotters. You can add pictures 
to your own symbol library and then paste them 
into other drawings. For more details, contact 
Michael Page at Acorn (Fulbourn Road). 

* New Adventure Game - Bush Rescue £21 
+VAT from 4Mation Educational Resources. 
An educational adventure program set in Aust¬ 
ralia - very appropriate in Bicentennial year! 

* What a bind! Archive PVC binders (£5.50 
each) are now in stock, Fm very pleased with 
them - they are strongly made and look very 
smart on the bookshelf. The binding system is 
such that even with only six or seven magazines 
they stay in place without any trouble. 



“If you order 500 binders at a time", he said, “they work out a lot cheapen” I worked out the cash flow 
OK i but I didn't think about the storage! They arrived today in thirty huge boxes I So if you're thinking 
of buying one “sometime ” can I urge you to buy it now? Please/?? Q 
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Comment Column 

No more Technical Help from Acorn? 

If you try to ring Acorn’s previously very helpful 
Customer Services Department, they will tell 
you that they are unable to give technical advice 
over the phone and advise you to talk to your 
local Acorn Dealer. The idea is that if your 
Acom dealer doesn’t know the answer he can get 
through on a special hot-line to Acom, try and 
explain your problem to them and then relay the 
message back to you. (Shades of “Send three and 
fourpence, we're going to a dance"!) 

Ask SID! 

Dealers (and you too, if you want to subscribe - 
£40 p.a,) can also ask SID - Acorn’s own 
Support and Information Database - a round- 
the-clock viewdata standard bulletin board. It 
has three main sections: a set of pages of 
“continuously up-dated general and technical 
advice”, information on new products and a 
bulletin board facility allowing you to 
communicate with each other and with SID’s 
editorial team. 

Look out SID, here comes CHARLIE! 

We are looking at the possibility of setting up a 
bulletin board specifically for the Archimedes. 
(SID supports all A com products). This would 
probably be free to all Archive subscribers. It 
would allow you to pose your technical queries; 
you could send in your hints and tips (and even 
I onge r art i c les, s ubject to c ons u 11 at i on wi tb the 
editor); you could download the Archive 
program listings (though I think we would make 
some charge for this); we could put Archimedes 
public domain software onto it etc, etc. If you 
have any views or good ideas or just want to 
encourage us to go ahead with the project, please 
get in touch. 

(There 1 s a prize for anyone who can work out what 
CHARLIE stands for!) 


No more free Arc-Writers? 

A quote from a letter from Acom to one of our 
readers: “Registered owners before 31st March 
will receive a free word processor for the 
Archimedes. Alternatively, we will be releasing 
First Word Plus next month (March) with built- 
in spelling checker and the facility to include 
graphics in the text”. I presume they don't mean 
that First Word Plus is to be the new freebee so 
I gather that they are no longer going to be giving 
away a word-processor with the Archimedes. 

Another Emulator Up-grade? 

No doubt you have paid your £15 for the up¬ 
grade PC-Emulator disc (version 1.09). Well 
now there’s a rumour that there is an up-graded 
MS-DOS disc for a further £10! It will 
“...automatically increase the MS-DOS 
application workspace to around 540k on a 
1 Mbyte machine.” 

(Actually, that report was from one reader, but 
when another reader called in at Fulboum Road, 
they said they hadn’t heard of any MS-DOS up¬ 
grade! Any ideas anyone?) 

The A410 — Worth the wait? 

The latest information I have from Acom is that 
the A410's with the newly designed primed 
circuit boards will not be available until the end 
of July. 1 suspect that Acom may not hurry Lhai 
project along too much because as soon as die 
410 becomes available, people will be able to 
up-grade the memory and add a cheaper hard- 
disc and end up wilh the equivalent of a 440 for 
somewhat less money. 

If this is the case, it seems that Acom are cutting 
their own throats. They may be able to persuade 
a few people that it is not worth waiting for the 
410 and get them to buy a 440, but by and large 
all they are doing Ls putting more and more 
people off the whole project. Acom have 
produced a superb machine that has terrific 
potential and now they are jeopardising the 
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whole thing by not producing the goods as and 
when promised. Did I hear you say something 
about “deja vu”? Well, to be fair, the BBC micro 
did eventually take off in a big way, but I wonder 
if that was as much due to influences from 
outside Acom than from within. 

RS423 Yet Again 

From reports we’ve been getting, the RS423 fix 
from Acom for the GTE 6551 chip seems to fix 
the problem of receiving at 9600 and 19200, but 
it seems to have introduced a problem when 
transmuting at those speeds. 

Still, there is hope!!! Fve heard that one chip 
manufacturer is about to launch a version of the 
chip which will work on the Archimedes, What 
I don’t know, however, is what Acorn’s policy 
will be about up-grading. I think that the 
machine as it stands is “not fit for the purpose for 
which it was sold” and therefore we will be 
within our rights to ask Acom to fit the new chips 
retrospectively as a field change through 
dealers, but we’ll just have to wait and see. 

(STOP PRESS - New version of GTE fix -1.24 - just arrived - not 
tested but will put on program disc.) 

(The. changes that are needed to eliminate the 
buzz are now apparently recognised by Acorn as 
field changes f so your local dealer should be 
able to do the job for you.) El 


(Matters Arising continued...) 

manual, rathe r than think in g they knew it all, and 
discovered a reference to it on page 16 (even 
referred to in the index under ‘‘listings, halting”) 
and would also have discovered that holding 
down <ctri> on its own slows down the listing to 
a steady, readable (well, viewable) speed. So 
now it’s one finger on <ctrl> and the other on and 
off <shift> for me. 

* Sorry about the misprint on the order form last 
month. The Integrex colour dump program is 
£25 as it says in the text, not £20, El 


Matters Arising... 

* Fast screenload/save. Due to a ‘feature’ of 
the 1.2 operating system you will find that the 
text cursor may appear on screen after a 
screenload. To avoid this, add line 1935 SWINE 
11 XOS_Re s tore Cu rs ors 1 \ 

* Backplanes - It seems that the backplane for 
the 400 series works OK on the 300 series 
machines. In other words there is no reason why 
you should not put four 8-bit podules on the 300 
machines. You cannot, however, put any 32-bit 
podules on a 300-series machine (if there were 
any 32-bit podules available!!!) because the 
extra address lines are not available on the p,c.b, 
connector. 

- The 1Mbit chips that you would need to put 
into a 305/310 to increase its memory to 4M are 
IS pin devices whereas die sockets are only 16 
pin, so the answer to the Fact or Fantasy 
statement on this issue is Fantasy! So says one 
reader, but another says that there is a pin 
compatible chip and that the operating system 
(which is the same as is in the 400 series) can 
detect which it has and accesses them 
accordingly, Solidisk apparently managed to get 
4 Mbytes going on 300 series machines but it 
involved cutting tracks in the interleaving layers 
of the p.c.b. by drilling a hole in the board. 

* Hard Disks, To clear up the speculation over 
the hard disk interface on the Archimedes, it is 
not SCSI but the Shughart ST506 standard. 

* Stopping the drive light coming on when 
accessing a 5,25" disc attached to a Viglen drive 

- remove links marked “FG” and IU T \ 

* Slower listings. I was rightly chastised by one 
reader for saying that non-BBC users would 
probably not know about holding <ctrl> and 
<shift> down together to halt the listings. On die 
contrary, non-BBC users would have read the 
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Hints and Ti p s. .. 

* One reader says he has solved the problem of 
“To linefeed or not to linefeed***” by adding a 
single pole switch in parallel with the contact on 
the printer dip-switch that sets the auto-linefeed 
on and off, leaving the dip-switch in the open 
position, of course* Don’t forget though that 
most printers only look at the dip-switch settings 
at power-up, though some do so when you do a 
software reset with 27,64. 

* Wi t h A r c - Writer, to get it not to double space 
on a Panasonic printer, use the AW_PCedil 
program, select the RX8QD and change the 
number of steps per 100 units vertically from 
21600 to 600* 

- View 3 works under the emulator if you poke 
locations A8A1, A8A2 and A8A3 with &EA* 

* Acomsoft ISO Pascal, Comal, Prolog and 
LISP all work under the emulator says one 
reader. 

* Share Analyser (Synergy Software) works 
perfectly under the 6502 emulator* 

* Four floppies on 1,2 OS, If you try *con, 
floppies 4* you will find that it tells you the 
number is too big, but if you use *FX 162,1 35,4 
and do a <ctrl-break>, you will finds that 
^STATUS tells you that you have four floppies. 

- Booting other drives. In contrast with the 
BBC micros, you can, on Archimedes, 

* MOUNT 1 and ihen <shift-break> to boot the 
disc in drive 1 * 

* WIMP Manager. Be aware that the first time 
Wimp poll is called, it clears the screen. 

* Fitting the backplane: It is an awkward job to 
fit the backplane because two plastic spacers are 
used into which self-tapping screws have to be 
inserted. This is best done in a vice to avoid 
stripping screw heads and/or sticking 
screwdrivers through your fingers! 


* 'Unknown IRQ at &OOOOOO0G\ If you get 

this error message (and possibly find that the 
machine hangs up on you) check whether your 
RS423 lead is properly screened, if at all* If it is 
not screened, it seems to be able to pick up 
interference (remember the micro-wave 
problems mentioned in issue 5, page 8?) and this 
generates spurious interrupts. 

* More ideas on the black art of RS423 

communication! Here is one reader’s recipe for 
succesful RS423 transfer* though it may not 
work for everyone** * T ry using the * fix’ module 
(Archive t .6 program disc) with pins IAS and 
9 linked together and 6 (DSR) and? (RTS) as the 
control lines. N ^ jp ^ F7/ 

* Running mo re than one BASIC program. If 
you have a BASIC program you want to run 
while you are working on another program in 
memory, you can program a couple of keys with: 

*KEY 4 P%—PAGE ; PAGE=&30000 

: CHAIN T, testprog rf (M 
*KEY 5 PAGE=P% : OLD|M 

- System Delta Plus: If you have trouble 
loading newly formed databases and get “No 
Room” when you know there is plenty of room, 
add a .D to the filename when loading, i.e* type 
in the filename as, say, “RECORDS.D”* 

* Inter-Word: If you have come from the 
desktop, you w ill find that the tab key does not 
work. This can be corrected with *FX219,9. 

If you want the £ sign, you will find it is 
produced by the ' key (far top left key). 

If you want the ' sign... tough! (The £ sign 
duplicates the “insert ruler” function!) 

* Stuck in a black hole? If you fmd yourself 
typing in black on black, try typing MODE 
MODE<return>. It allows you to type again, but 
maintains the mode you were in* 

* SystemDevs module* The redirection 
commands* some of which we said didn T seem 
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Hints and Tips 


to work, are sensitive to spacing. The correct 
forms are as follows where the spaces are 
represented by bullets (*}: 

*CAT *{•>*info*} 

Spools catalogue to file “info” 

*CAT• { *»■ info*} 

Adds catalogue to File “info” 

*BASIC*{•< *data*}-PROG 

Runs “PROG” and uses information in file 
“data” for input, 

* Using the Acorn ROM Podule: No links are 
available for the RAM sockets, although you can 
configure the sockets by software for 8k, 32k or 
128k RAM chips. Using IIM6264LP-L5 ram in 
the sockets and configuring them as Sk does not 
immediately work. However if you configure 
them as 32k chip and apply an offset of &2000 
when loading i.e.: 

*RMLoad <podule nnmber> 

<socket> <filename> 2000 

then your data will load correctly. This is 
because the Chip Select (CS) on the 8k chips is 
on the pin Address 13 (pin 26) on the 32k and 
128k, This causes the 8k chip to be mapped into 
8-16k and 24-32k hence the offset of 8k. The 
inverted CS on pin 20 is common to all three 
devices. (Without configuring them as 32k, the 
operating system reports that the device is not 
big enough for an 8k offset.) 

* Concerning Acornsort C and TWIN: 
‘Concurrency’ (keeping text in one window and 
compi ling a program in the other) does not work. 
The compiler (vl.5A) has a bug in it that 
prevents it from working. Acom said that it used 
to work OK on the pre-release version! 
However, compiler output can be sent to a file 
called tmp.temp if the -spool option is used. 

It may be necessary to relocate TWIN in order to 
compile programs. My version of TWIN loaded 


at &60000 but needed to be relocated to &800G0 
to allow the compiler enough space. (See 
below.) If the compiler crashes, try increasing 
the SystemS ize using * configure. 

The two compiler messages, ‘Fatal I/O error 1 
and 'Binary output error', simply mean that your 
disc is full! 

* More about TWIN. Twin is an editor which 
seems to have one or two hidden features; firstly 
it is a relocatable program, and consequently can 
be loaded anywhere where RAM exists (barring 
overwriting OS workspace etc,). I have created 
a version which I call LoTwin which loads at 
Sc 10000; this leaves space for BASIC programs 
only 256 bytes fewer than are available on a 
BBC Master using Shadow RAM, and yet it 
allows me considerably more work space than 
the standard Twin. 

To create a version of Twin called ‘MYTWIN* 
which loads and runs other than at the ‘nonnaF 
address, perform the following actions: 

*DIR <dir 1 ry_containing _Twin> 
*LOAD TWIN <new_load_address> 
*EX 

*SAVE MYTWIN <new_Load_ 

address> +<size> 

<size> is obtained from the 3rd column of hex 
data after the 4 *EX’, 

Then, to invoke the new version, type 
*MYTWIN 

and it will run. Pressing <shift-f5> followed by 
<T> after entering MYTWIN will show the load 
address on the top line immediately to the left of 
the time.! have yet to see mentioned in print the 
‘warm start 1 for TWIN. If something nasty 
happens and your Archimedes locks up just as 
you have spent a couple of hours typing in 
something using TWIN, and you have no option 
but to press <ctrl-break>, or even <ctrl-reset>, 
do not despair, simply type: 
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*G0 <twin_start_address> -WARM 

and you will find yourself back in TWIN exactly 
as you were when the * nasty 1 happened, barring 
any corruption caused by the "nasty 7 . Don't 
forget the *- 7 preceding the “WARM 7 ! I have 
found myself in this position after a momentary 
power cut, and although the warm start did not 
restore TWIN as a fully functional editor (due to 
corruption), it restored Twin’s ability to save 
text, so I saved what I had done, and was then 
able to reload Twin, and then reload my text. 

* Iso Pascal: Be warned before you buy Iso 
Pascal, it has NO support for Arthur-otherwise, 
says one reader, it is an excellent 
implementation. Also (in common with C) it 
comes with a very thin manual, so a copy of 
TWIN and a book about the language (see the 
mini-review on page 25) will be needed for most 
people. 

(More information about other languages wgj 
sent in, but this was all I could digest with my 
limited knowledge of languages other than 
BASIC. Would anyone he prepared to receive all 
the “other languages " information and knock it 
up into a special section each month?) 

Using the Computer Concepts 
ROM Podule 

How many times have you had to press cctrl- 
break> and muttered under your breath because 
you’ve lost your function key definitions? That 
need never happen again if you have Computer 
Concepts 7 s ROM podule with some battery- 
backed RAM on it. All you do is configure the 
system to start up in the RFS instead of the 
ADFS and also configure it to auto-boot. Then in 
the RFS, you put a boot file something like: 

REM > RFS:!BOOT 

* SET Run$Path ,ADFS:$.,RFS:$.%. 

*ADFS 

*FX255,8 

PRINT “Acorn ADFS " 1 


*KE¥ 0 These are 
*KEY 1 my favourite 
*KEY 2 key definitions 
*SET ALIAS$> Cat 
*SET ALIAS $ ? HELP etc 
±BASIC 

(You will notice that the Run$Path uses 
instead of as stated on page 28 of the 
Computer Concepts manual,) 

* To get die Inter series software to boot up 
with a simple call such as *ISHEET, copy 
65Arthur into the RAM area using *COPY 
ADFS:Modules.65Arthur RFS:65Arthur and, 
providing you have set up the RunSPath as 
above, *ISHEET, *IWORD and *ICHART will 
automatically load the emulator and then the 
appropriate software, 

* Installing Word wise Plus, If you copy the 
Archimedes version of Wordwise Plus from 
Computer Concepts 7 s disc (filename “WWV 7 ) 
into the RFS calling it, say, WWIMAGE, you 
can modify the BASIC program “ISHEET” and 
save it as 4 WW+” so that, as above, you can just 
type *WW+ and it will auto-load the emulator 
and run die software. The modifications are to 
change the references to “ISIMAGE” at lines 
130 and 270 into “WWIMAGE 77 . 

* If you want to modify any of the programs 
in a ROM, all you do is either LOAD it, edit it 
and SAVE it or, if you have the modified version 
on disc, just *COPY it. If you tell it to SAVE a 
file with a name that exists in ROM it gives the 
ram version precedence over the ROM version. 

To find out whether a particular file is in ROM 
or RAM, use the *INFO <filename> command. 
If it conies up with a “* 77 before the final figure 
of the information, the file is in the RAM area. 
To get the ROM version back, you either have to 
do a <ctrl-break> or type *RMREINIT RFS 
<retum> because * delete filename removes all 
trace of it so that even die ROM version is 
inaccessible. 
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Thanks to Adrian Look for all the following 
hints and tips * 

• X-SWPs, When using SWI’s if you put an X 
before the name then the SYS call from BASIC 
will not generate an error. For example: 

SYS ir XOS_CLI n , block 

* Modes & dra wing speed. The VIDC receives 
the video data down the data bus lines of the 
ARM processor. While this is happening the 
RISC chip cannot perform any processing. This 
means that the screen modes using higher 
memory will be slower. Try timing a FOR- 
NEXT loop of 1,000,0001 So, i f speed is of the 
essence, il may be better to go into model), do the 
calculations and save them in an array and then 
go into mode whatever to plot the results. 

However, there is a compensating factor. The 
lower memory modes use one byte to represent 
several pixels, thus addressing pixels requires 
extra calculation - whereas the higher memory 
modes use only one byte to represent a pixel so 
addressing pixels is much quicker. This means 
that graphics will be quicker in higher modes. 


Mode 

F/N loop 

Draw 

Mem. 

Colours 


(secs) 

(secs) 

00 


0 

14.9 

51 

20 

2 

1 

14.9 

38 

20 

4 

2 

15.6 

34 

40 

16 

3 

15.6 

- 

40 

Text 

4 

14.9 

38 

20 

2 

5 

14.9 

32 

20 

4 

6 

14.9 

- 

20 

Text 

7 

15,6 

- 

80 

T-Text 

8 

15.6 

54 

40 

4 

9 

15.6 

40 

40 

16 

10 

17.1 

39 

80 

256 

11 

15.6 

- 

40 

Text 

12 

17.1 

61 

80 

16 

13 

17.1 

45 

80 

256 

14 

17.1 

- 

80 

Text 

15 

21.3 

79 

160 

256 

16 

19.6 

— 

132 

Text 

17 

19.5 

— 

132 

Text 

18 

15.4 

70 

40 

2 

19 

16,9 

77 

80 

4 

20 

21.0 

98 

160 

16 


* OS Pretty Print. Have you ever wondered 
how the operating system manages to display all 
its messages without any of the words getting 
split at the end of a screen line, no matter what 
mode it is In? Well, the answer is *OS_ 
Pretty Printh 

If you print all your strings using this call it will 
stop any words going over the end-of-line 
boundary. This call recognises the following 
control characters in a special way: 

- CR (CHR$(13)) causes not just a carriage 
return but also a newline* 

-TAB (CHR$(9)) causes a tabulation to the next 
multiple of eight columns. 

- CHR$(31) is a "pad character 1 , that is, the 
procedure will print a space when this code 
occurs but it will not break the string up at this 
point. 

Example: 

A$= M Hello my name is..," 

SYS "OS_PrettyPrirLt",AS 

- The QUICK option When you use the 
(Q)uick option in the *COPY and * BACK UP 
commands, the OS will use all available 
memory. This means that if you are in high 
memory screen modes then you will have less 
memory to use. So if you want even quicker 
*CQPYing or *BACKUPs then try It in a mode 
which uses less memory. 

* Run$Path and FiIe$Patln The FileSwitch 
uses two system variables called Run$Path and 
FileSPath. You can see their values by typing 
either: 

*SHGffi File$Path <return> and/or 
Rum$Path <return> 

You will probably get the following results: 

FileSPath : type String, value : 

Run$Path : type String, value : 
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Hints and Tips 


These am the default settings. The values stored 
in the FileSPath and RunSPath variables are 
actually a list of directory filenames separated 
by commas and terminated with dots. 

When the FileSwltch is told to read a file it will 
look at FileSPath variable and search for the file 
in each of die directories listed until it finds a 
match. S imilarly the FiieSwitch will do the same 
when it is told to execute a file, only it will use 
the RunSPath variable as the lisi of directories. 
For example: 

* SET FileSPath RFS 

This would cause the FiieSwitch to search for 
die file first in die RFS filing system’s library 
directory, then in the current filing system’s 
current directory (hence the , ” which means 
don’t add anything to the filename as entered), 
and finally in the current filing system’s library 
directory. 

Here is a list of all the possible directory prefixes 
(althoughyou can actually specify any directory 
by name — wildcards may be used): 

* - all 

$ - root 

El — user 

@ — current 

A - parent 

% — library 

] — previous 

* FI ushing t he Mouse. You may have noticed 
that the mouse has a buffer of its own. This 
means that the Arc stores all the mouse 
movements and clicks just as it stores the 
keyboard entries. 1 low many of you play around 
with the mouse when a program is Thinking’ or 
waiting for a screen to load? This will leave a 
whole load of mouse positions and clicks in the 
buffer, so any subsequent MOUSE X,Y,B 
readings will not reflect the true position of the 
mouse but die positions stored in the buffer! I! So 
how do you clear the buffer? To flush all the 


buffers, type: 

*FX 15 <return> 
to flush just die mouse buffer, type: 

*FX 21 ,9 <return> 

* Local DATA statements. (Based on an idea 
sent in by C.R.Fitch) In answer to the query last 
month, it is possible to have DATA statements 
in a program diat does not rely on line numbers. 
Whai you can do is to use the error handler to 
pin-point a line number just before the local data 
statements. For every data set you want to 
access, just use the following format; 

DEFPROCdata_set 
LOCAL ERROR 

ON ERROR LOCAL RESTORE ERL 
IF ERL=0 THEN ERROR 1,"get line 

number" 

RESTORE ERROR 

DATA 1,2,3,4,5 : REM put your 
own data here 

ENDPROC 

Then if you want to use the data set, just call the 
procedure, as for example: 

PRGCdata_set 
FOR i-1 TO 5 
READ data:PRINT data 
NEXT i 

The procedure leaves everything exactly as it 
was (except the data painter) so it does not affect 
the program at all. The only snag is that we don’t 
know where the old data pointer was so we can’t 
continue reading data from where we left off! 
Any ideas?? 

(The remaining information in this section is 
about using the MS-DOS emulator: More 
information than this was sent in, but this was 
all l could digest with my limited knowledge of 
MS-DOS, Would anyone he prepared to 
receive all such information and knock it up 
into a special MS-DOS section each month?) 
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MS-DOS Hints and Tips 


Monitor Information 


* GETfile and PUTfile on the MS-DOS 
emulator are difficult to use if you only have a 
single drive. However, if you configure a RAM 
disc with MS-DOS you can then copy MS-DOS 
files onto it and then form the ADFS Files on the 
physical drive and vice versa to take ADFS files 
in to the MS-DOS file system. 

* Programs that work under the PC-emuktor. 
I've had lots of information about MS-DOS 
software that does work, hut has anyone found 
any software that does NOT work under the PC- 
emulator? 

* With version 1.09 of the PC emulator, if you 
do the following... 

*LOAD PC.Emulate 10000 
?&137C8“0 

*SAVE PC.Emulates 10000 

you will find that the memory isn't cleared when 
you press the reset button. 

•One good book to help new MS-DGS'ers 
(sorry!) is “Quick Reference Guide to MS- 
DOS’ 1 by Van Wolverton, published by 
Microsoft Press, obtainable via Watford 
Electronics at £3.95. (ISBN 1-55615-025-3) 

* From various rep orts , it seems that C H KD S K 
does work properly though it has to be used with 
care. It can be used to repair the File Allocation 
Table (FAT) and repair errors in directories. 
Files are not necessarily stored contiguously on 
an MS-DOS disc, so if part of a file is lost then 
CFIKDSK can be used to convert lost chains to 
files (he. write to a disc directory). Generally, 
CHKDSK by itself is safe. CHKDSK * * /V is 
usually safe, but CHKDSK ** /F is dangerous 
if you don't know what you are doing! 0 


• The Microvitec 1455 (medium resolution - 
653 dots horizontally) works OK on the 
Archimedes giving a quite acceptable picture - 
“clear, sharp pictures” says one person, “better 
than the Phillips” says another. Although it has 
an RGB input for BBC type TTL signals, to use 
the linear signals from the Archimedes, you 
have to use the four separate BNC inputs 
instead: R, G, B and sync. This monitor only 
works up to mode 17, though. 

• The Elect rohome High Res Data Display 

monitor from Opus gives “satisfactory results - 
probably a bit too much green”. (Could it be just 
the needfor a resistor change in the video output 
of Archimedes? Issue 3, pages 7/8 Ed.) 

• Philips Monitor/TV Model No 14CFI114 

works in that it gives all the colours, but it is not 
really readable in 132 column mode. 

The next two contributions were from Holland , 
so may not be relevant to UK subscribers. 

• The Philips CM8833 medium resolution 
monitor works OK on the Archimedes and, with 
die lead from a cheap Walkman type headphone 
to the relevant pins on the SC ART plug, you can 
get it to produce stereo sound through its 
speakers! (See Mow for pin connections.) 

• The Philips CMS873 multi-sync monitor 
works well except that in modes 18 to 20, the 
display shifts horizontally (see the Taxan/NEC 
review) more than can be compensated for by 
the external controls. Internal adjustment is 
needed. The reader says diat he does not agree 
with the PCW review on this monitor which said 
dial die display was unstable. His is rock-steady. 

Ben Bles from Woerden, Holland, who sent in the 
previous comment T also sent in the fallowing: 

SC ART stands for “Syndic at des Constmcteurs 
d'Appariels de Radio et de Television”. (141 bet 
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Multi-sync Monitors - NEC versus Taxan 


Which Multi-sync? 

Just in case you are fortunate enough to be able 
to afford a multi-sync monitor, I've got hold of 
two to try - NEC's new Multi-sync II and the 
Taxan 770 Plus, (The latter was on load for 
review; grateful thanks to Taxan UK!) I've been 
able to put them together on the bench and 
compare them side-by-side. Here are my views 
and comparisons under various headings. 

Price 

The RRP's are: Taxan £699 +VAT and NEC 
£649 +VAT. (£746 and £803 respectively.) 
However, if you shop around, you should be able 
to get them somewhat less than that. For 
example, Beebug members can get the NEC for 
£635 inc VAT and Watford sell the Taxan at 
£570 inc VAT. 

Specification 

Both are 14" monitors for use on CGA, EGA, 
PGA and MDA standards (i.e. you can use them 
on your IBM's as well as the Archimedes), Both 
have analogue and TTL inputs. Both scan 
roughly 15-35 kHz vertically and 50 — 90 Hz 


horizontally. Both have 0.31 mm dot pitch and 
both claim a 30 MHz bandwidth. Both weigh 
about 31 lb (14 kg). So what’s the difference? It 
looks as if they should be exactly the same. 

In use 

When using the two side by side, certain 
differences did appear. The basic (subjective) 
resolution is about the same, but the Taxan 
didn't have much to spare on either contrast or 
brightness. In very bright conditions that might 
be important, though in darker conditions, the 
NEC’s brightness was almost too much even 
when on minimum. 

The main disadvantage of the T ax an is that in the 
hi-res modes (18, 19, 20) the whole display 
shifts over to the right by 14 nun (over half an 
inch). It's not just a fault on the particular 
monitor I've got because one of the readers 
reported the same thing — 16 mm in his case. 
Taxan told him that it must be a fault with the 
computer, but the NEC monitor seems to cope, 
I spoke to Taxan’s technical bods who, so far, 
have not come up with a solution. 


(Continued from overleaf ,.. J 
you wish you’d never asked!) The French 
equipment manufacturing industry set up this 
standard for all video equipment, though 
obviously it is not adopted universally. The 
SC ART connections are: 

1 audio out (R) 

2 audio in (R) 

3 audio out (L) 

4 audio ground 

5 blue ground 

6 audio in (L) 

7 blue video (sic!) (sick?) 

8 s wi tch v o ltage (0=TV; 1 =acc e ss ory) 


9 green ground 

10 free 

11 green video 

12 free 

13 red ground 

14 free 

15 red video 

16 blanking signal 

17 video ground 

18 blanking ground 

19 video out (CVBS) 

20 video in (CVBS) 

21 connector ground g] 
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Which Multisync? 


The Tax an had more comprehensive controls 
for picture size and position. Most notably, it had 
a horizontal size control which the NEC did not. 
I wanted to make the NEC’s picture fill the 
screen more fully (I like to feel I get better value 
for money that way!) but was unable to do so. 
The only control was a horizontal size switch 
marked “on” and “off” and it made the picture 
smaller, not bigger. 

The Taxan monitor came with a lead (which 
costs extra) to allow it to be connected to a BBC 
Micro - it works beautifully. I tried to use the 
lead with the NEC monitor, but it didn’t seem to 
want to synchronise with the BBC signal. 1 
thought it should have worked because the pin 
connections seem to be the same for the two 
monitors. However, NEC have assured me on 
the phone that their monitor does work on the 
BBC micro. 

Styling and layout 

Both are similarly styled in grey plastic on a tilt 
and swivel stand. The only slight advantage of 
the NEC was that most of the external controls 
were on the front panel whereas the Taxan only 
has contrast and brightness on the front. The 
Taxan, however, has four sets of preset controls 
for the four IBM standards accessible with a 
plastic tool (provided) for adjusting each 
separately. Though this does not seem to be 
relevant to the Archimedes itself, it may 
influence your purchase if you are wanting to be 
able to use the same monitor on different 
computers. 

A minus for the NEC monitor comes when you 
compare the leads that are provided. With the 
Taxan, you get a mains lead that plugs into the 
mains output socket of the Archimedes whereas 
the NEC lead just has bare wires at the end and 
you have to hum around for a spare mains plug 
- and then find a spare socket to fit it in! Having 
paid several hundred pounds for a monitor, I feel 


that they could at least have put a moulded plug 
on it for me! 

The video leads were also rather different. The 
Taxan one had long knurled nuts which meant 
you could secure the plugs easily without having 
to find a screwdriver and the plugs had moulded 
leads which made them look less prone to 
damage than the NEC ones. These had plastic 
collars which seemed to be not too securely 
attached to the metal bodies of the plugs. The 
Taxan lead also had on it what was referred to in 
the documentation as a “ferrite collar”. The NEC 
lead didn’t have one, but I could not find out 
whether it actually made any difference. 

Which one to buy? 

There are obviously various pros and cons, but 
on balance, I think I preferred the NEC monitor, 
mainly because of the annoying picture shift in 
the hi-res modes on the Taxan. If you have an 
IBM computer as well, you may prefer the 
Taxan because of its greater adjustability. The 
other factor is what sort of price you have to pay 
for each monitor and so the NEC wins out again, 
although Watford Electronics’ price for both is 
the same, £495 +VAT = £570. 

Bulk Purchase 

If we can get together five or more people, we 
can get the price of the NEC Multi-sync ITs 
down to £544 inc VAT and if we can get ten or 
more, we can get down to £530. These prices 
however are on the basis of cheque with order 
and the purchaser has to arrange collection from 
Norwich. If you are interested, give us a ring as 
soon as possible. 

(Actually, the NEC / have been testing, although 
bought singly, was purchased at a special price . 
I'd like to keep it but can't afford to at the 
moment , so if anyone wants one straight away, 
this one is going for £540 - "first come first 
served 0 
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- Help with the magazine. Would anyone be 
interested in editing a special section in the 
magazine for MS-DOS users? (MS- 
DOS’ers?!) Now that we have so much material 
being sent in by readers, I find it difficult enough 
editing the main part of the magazine, let alone 
MS-DOS applications about which I know 
virtually nothing! 1 would send the MS-DOS 
editor all the relevant contributions which he/ 
she would have to knock up into some sort of 
coherent section for inclusion in the magazine 
each month. If you are interested, let us know. 

What about someone else editing a Languages 5 
Corner? Again this is something 1 know 
nothing about having been weaned on BASIC 
and 6502 assembler 

I have also received two or three programs/ 
articles about trying to get to grips with the 256 
colour modes and I need someone to look at 
them all and pull them together into one (or a 
series?) of articles and programs. This is an area 
where I don’t have the necessary technical 
knowledge or time, to do the editing. (What do 
you mean "Well, what DOES this editor know 

about?.,. ” ?!?) f ft's OK, Adrian toys he'it do the 

256 colour thing.) 

Because of the problems with the RS423, we 
don’t seem to have many contributions about 
communications, but when we do, how about 
someone editing that separately? Any other 
special interest sections that you can think of? 

* Stolen! Acom Archimedes + colour monitor! 
Keeps your eyes open and let Paul Fray Ltd 
(0223 66529) know if you see them. Computer 
serial N- 27-AKB15-1000210 and monitor 
serial 28-AKF11-1000512. 

* One reader asks if someone could write a 
partial renumber routine for BASIC. He 


accepts that the purists don*t like numbered 
programs and that BASIC V has lots of facilities 
for avoiding the use of line numbers, but he 
thinks that with the very large programs that 
Archimedes can handle, such a routine would be 
invaluable. (But remember that if you use the 
ARM BASIC editor, there are times when it 
automatically renumbers the program for you!) 

* Could someone write a checksum utility for 
the program listings? 

* People are still reporting problems getting 
Viewstore to work on the Archimedes. Has 
anyone got Viewstore l .2 working? Has anyone 
got the utilities working? 

* Does anyone know if the KAGA Vision III 
mon itor will work on the Archimedes? Dr Peter 
Howard of Church Crookliam would love to 
know because he, like so many, I suspect, is 
trying to convince the “powers that be” that an 
Archimedes would be a good investment. The 
knowledge that he could use his existing 
monitor might just persuade his wife to give in! 

■ Anyone got any idea about the AOF (Acorn 
Object Format) or the library format? The 
PRM is less than forthcoming. 

* Program suites. Has anyone tried to use a 
number of different programs as a suite, passing 
variables between them? If so, can you give us 
some clues about the techniques used. 

* Data transfer with Apricot? Has anyone 
tried it? In theory you should be able to read 
Apricot discs on the Archimedes. Or has anyone 
had any success with serial transfer? (Ian 
Hamilton, JK578J) 

* Lawson Wakefield writes: 

“Is there any way to disable the annoying 
“Finished after nn seconds” message which 
Arthur keeps coming up with? If you are using 
Fortran or C, virtually every command is 
punctuated with the confounded thing! 
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The linker as supplied with Fortran and C comes 
up with some amazing error messages. Who 
would have known that “Uncaught Modula 2 
exception - User defined” actually meant “Out 
of memory”?! 

It looks as if there is no form of command line 
substitution for Arthur command files, even 
though we now have a powerful command 
language. In other words, we can’t write 
operating system procedures with variable 
command line arguments, like %l, %2 etc as 
used in DOS or the $ 1 „ $2 etc under Unix. I know 
we have aliases but they are only useful for 
relatively short commands. Perhaps I’ve 
overlooked something in the PRM. If so, 
perhaps someone could enlighten me. 

Arthurlib for Fortran? - At present, Acomsoft 
Fortran offers no interface to Arthur. Is there a 
version of Arthurlib around like the one supplied 
with ‘CT’ 

Help answers 

* In the December issue there was a query about 
machine code programs that would run OK 
when called from within BASIC but not when 
*RUN as a separate file. Ken Robbins writes... 

“The problem is that *RUN does not provide a 
stack via R13. R14 IS valid and points to a SWI 
OS_Exit up in ROM virtual storage. I solved the 
problem by: 

a) Removing the 5TMFD/LDMFD required 
for the BASIC linkage and saving R14 in a word 
of local storage; on exit, load R15 from the 1- 
word save area. 

b) *STAMPing the loadable program and 
♦SETTYPEing as module type &FF8 (absolute 
code to be loaded at &8000 in the application 
work-space). Note that offset assembly may be 
required if a self-relocating programming style 
is not used.” Q 


Let’s Name Names! 

I_ \ : " v : ; ; v v _ 

Well, it had to be in there somewhere! If you do 
a * MEMORY 3876300 3876585 on OS 1.2, 
you will see the following information: 

Thanks are due to the following people; 


Graham Anderson 

Nick Reeves 

Tudor Brown 

Sharon Shelley 

Bruce Cockbum 

Jim Sutton 

Tim Dobson 

Stuart Swales 

Paul Fellows 

Paul Swindell 

David Flynn 

Jon Thackray 

Steve Furber 

Alasdair Thomas 

Dave Howard 

Tony Thompson 

Richard King 

Hugo Tyson 

Richard Manby 

Jamie Urquhart 

Mike Muller 

John Wilkins 

Harry Oldham 

Jes Wills 

Neil Raine 

Roger Wilson 

Others who have assisted: 

Alex Bienek 

Mike Hill 

John Biggs 

Henry Howarth 

David Burling 

Ian Jack 

Martin Clemoes 

Kechil Kirkham 

Vic Gibling 

Andrew Powis 

Martyn Gilbert 

Jacqui Sanalitro 

Mark Hall 

Graham Smith 


Last and certainly least; 
David Bell 

Brian Long et Gooney Bird! 


That's what it says! Plug in your debugger 
and have a look if you dont believe me. H 
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Mandelbrot and Julia Sets for Beginners 


Barry J. Biddles 

You must, by now, have seen some of those 
amazing Mandelbrot pictures, either in the 
review in PCW, Aug '87* or on the A com demo 
disk, and perhaps thought that such complicated 
matters were beyond either your mathematical 
ability or your computing skill* The puipose of 
this article is to show that the mathematics is 
quite straightforward - at the level required to 
produce the pictures - and that anyone with a 
pixel plotting command, even in monochrome, 
can do it for himself. 


signifies that the associated quantity Y is in a 
direction at right angles to the other one. It turns 
out to be very convenient if T is more than just 
a marker; a lot of other maths is simplified if T 
has the value of the square root of -L Such a 
number is imaginary of course, so the quantity Y 
is sometimes called the imaginary term, and the 
quantity X is correspondingly called the real 
term. So if the point Z is 

Z: X + iY then the point Z A 2 is 
Z A 2: (X+iY)*(X+iY) 


When I recently introduced this subject at my 
club, I started by showing a picture, then asking 
if anyone would like the equation used to 
produce it* After comments like “My notebook 
is not big enoughs everyone was surprised to 
learn that the equation was simply 

Z becomes Z A 2 + C — applied iteratively. 

Ladies first!? 


Work it out in the usual way, but: remembering 
that i A 2 = -1, and you get 

Z A 2: (X A 2 -Y A 2) + i*(2,X,Y) 

The two terms in brackets are the new X and Y 
coordinates of the point Z A 2. These are the 
values after the first application of the process* 
The next steps all consist of iteration, i.e* feeding 
the latest 4 new values' back into the process for 
another iteration* 


There are two related sets of points, called the 
Mandelbrot set and the Julia set. 1 shall start by 
explaining the Julia set, as it is slightly easier to 
grasp. Think about the X-Y plane, with a circle 
of unit radius drawn about the origin* Consider 
a point Z. Now if the point Z is outside the circle, 
it must be further than 1 from the origin, and so 
a point Z A 2 will be even further away* On the 
other hand, if Z is inside the circle, then the point 
Z A 2 will be closer to the origin. If the squaring 
process is iterated indefinitely, the point will 
either go to infinity, or will approach the origin* 

Before going any further, I must explain exactly 
what 1 mean by the square of a point - and this 
is the slightly difficult part of the maths for a 
non-specialist* Mathematicians refer to a point Z 
with coordinates X and Y as (X,Y) or (X Y), but 
sometimes as X+iY, where V is a marker which 


Suppose, now, that you colour the starting point 
Z according to whether it goes off towards 
infinity or approaches the origin after many 
iterations* Use a colour which depends upon the 



Figure 1 
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speed with which it takes off toward infinity, but 
colour it black if it does not. The speed can be 
assessed by counting how many iterations it 
required to get well on its way, say to a radius of 
2 or beyond (he. X A 2+Y A 2 >=4), What you 
would get is a black unit circle surrounded by 
coloured fringes, as shown in Figure 1. 

Now we change the rules, to make it more 
exciting. Instead of the process being simply Z:= 
Z a 2 5 we use 

Z:- Z A 2 + C where C= P+iQ 

C is what we call a ‘complex constant*, he. a 
constant made up of a ‘real* part and an 
‘imaginary 1 part. When you add it to the 
complex quantity Z you simply add real to real 
and imaginary to imaginary, so the process now 
becomes 

Z:- (X A 2 - Y A 2 +P) + i*(2.X.Y + Q) 

If P and Q are zero you get the black circle, as 
before, but if they have non-zero values the 
effect is quite unexpected. The black disk 
becomes weirdly distorted, with an infinitely 
crinkly edge. This kind of shape is called 
‘fractal 1 - short for ‘fractional dimensions 1 . It 
obviously encloses a finite area, yet it has 
infinite length. It is ‘self similar 1 - meaning that 
whatever magnification you choose to examine 
it with you will see much the same level of 
complexity. Fig 2 shows the appearance when 
C=0.31+i*0,04. Note that it is the black points 
which constitute the Julia Set; die coloured 
regions outside the set simply add to the beauty 
of the picture. (Sony, but can't afford colour 
repro! Ed.) 

So why can't we have colours inside as well? 
The problem is that there is no simple test like 
the outside ‘infinity test 1 to determine which 
colour to use. An internal point does not 
necessarily go to the origin, or to any fixed point 
inside. It may even land on a repetitive cycle of 
points. If you don't know where it is going, how 


can you test to see how long it took to get there? 
I shall return to this problem later. 

To summarise Julia, each point on the screen is 
processed repetitively by the process Z:=Z A 2+C 
where C is a complex constant. The points are 
coloured according to how fast they go off to 
infinity, or coloured black if they do not. 

“Curiouser and Curiouser 1 ’, said Alice 
-The Mandelbrot Set 

There is an alternative. Instead of processing 
every point using a constant value of C, what 
happens if you always process only one point, 
usually the origin, but explore the effect of 
different values of C? The values of the real and 
imaginary parts of C are going to be taken from 
the screen coordinates of each point to be 
considered for colouring, so this time let's have 
the screen called P, Q instead of X, Y. The 
coordinates of each screen point then become 
the complex quantity OP+iQ (C is no longer 
constant of course, but to keep it understandable 
I won't change the name.) The starting point, i.e. 
the origin, is processed by the same law as 
before, namely Z;=Z A 2+C, and again is 
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coloured according to how many squarings it 
takes to get to a distance of 2 or more from the 
origin, or coloured black if this does not happen. 

The well known Mandelbrot 'base picture* is 
shown in Fig.3, where P spans the range -2.2 to 
+1.5, and Q goes from -1.5 to +1.5. All of the 
other Mandelbrot pictures that you may have 
seen simply use different ranges of P and Q. By 
specifying very small ranges of P and Q, and 
displaying them full screen size, you are 
effectively looking at the edge of the 
Mandelbrot set with very high magnification. 
As before, the fractal edge of the set has the 
property of self-similarity, so that there is a 
literally infinite amount of detail there to be 
seen. I typically use magnifications of up to 
100,000 with respect to that base picture which 
I call mag=l (Compare this with a good optical 
microscope which would only have a 
magnification of, say, 1000.) 

[ find it convenient to specify the pictures 
according to the coordinates of their centre, and 
the magnification with respect to the 'base 
picture*. Pig 4 shows a small detail at - 


0.74592657, +0.18008656, at a magnification 
of 8000. 

Many of the pictures (when seen in colour) give 
the overwhelming impression of 'looking back 
down the beanstalk* to the fields and lakes far 
below, though this is purely subjective-there is 
no mal association with depth. However, if you 
zoom the magnification it creates the impression 
of diving down into those fields, so... 

...apipedream: just imagine a Cray in the living 
room, creating the pictures at video speed, with 
the parameters controlled by a joystick for 
forward, side and 'height*, flying through 
Mandelbrot space 11 can 5 1 afford a Cray, but I am 
setting up a similar project based on a few 
thousand slides and a slide dissolve projection 
system, entitled 'Mandelbrot - The Movie*. 

There are many programs now available to 
display the Mandelbrot and Julia pictures. Some 
of them are in machine code, and the best that I 
have seen takes only 27 seconds per picture, 
though if it is only integer arithmetic it runs out 
of resolution at the high magnifications J 
mentioned earlier. However, these programs are 
great for exploring the set 
within those limits. 

My own programs are 
written in BASIC and in C, 
and are easier to experiment 
with, though slower. For 
example, returning to the 
problem of colours inside 
the set, it occurred to me that 
you do not need to know 
where the point has gone to, 
you only need to know when 
it has arrived, i.e. when it has 
stopped moving. So if you 
work out the move length for 
each iteration of the process, 
you can test for when it has 
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Mandelbrot & Julia 


stopped (effectively) and colour it accordingly. 
This does indeed produce coloured fringes in the 
set, but they arc not the same ones as shown in 
the literature, so I guess that this approach is far 
too simple. I am continuing to work on it. 

Where next? 

I can’t end an article on this subject without 
referring to the best book that I have yet 
encountered in this field. Not Mandelbrot’s own 
The Fractal Geometry of Nature \ which is a 
very abstruse work suitable only for advanced 
mathematicians, but 'The Beauty of Fractals’ by 
H.O.Peitgen and P.H. Richter, published by 
Springer Verlag. Written by a team from 
Bremmen University, and including specialised 
articles from a number of people including 
Mandelbrot himself However, 80% of the book 


is still too heavy going for ordinary mortals. 
(The superficial mathematics is very simple as I 
have shown, but it leads naturally into topics like 
the statistics of rough surfaces and very 
advanced set theory.) However, the book is 
magnificently illustrated with colour photo¬ 
graphs on very good quality art paper, and also 
contains a brief'Do-It-Yourself section, from 
which I was able to make my start. This is a 
fascinating book which anyone interested in the 
subject MUST see, though at over£30 you may 
have to think twice about buying it. 

My BASIC andCprograms-including source code 
- are available free by sending me a formatted disk 
with return postage amt re useable packing (don’t 
wrap it to withstand nuclear attack - a jiffy bag is 
quite ample.) Send to Mr B J Biddles, 3 Acer Road\ 
Biggin Hill, Kent. 0 
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ARM Code Mandelbrot Program 


William Doggett 

William has written a machine code 
Mandelbrot program, independently of the 
one in Acorn User. The speed is phenomenal 
and it tops the Acorn User program by 
providing more comprehensivefacilities-for 
example, if you start to zoom into an area and 
change your mind, you can stop the 
calculation before it has reached the end of 
the screen and/or zoom back out again to the 
previous view. 

Program Notes 

(In these notes the zoom area is defined as the 
area within, and including, the boundary of the 
movable square.) 

All control is via the mouse, with the controls 
explained on-screen. 

The program starts up with the initial screen, 
which displays the entire Mandelbrot set. 
Calculation time is approximately 80 seconds. 

Plotting can be interrupted at any time (the 
current line being completed first), by pressing 
the <left> button (<selcct>). The zoom facility is 
then entered. 

The program allows very comprehensive 
exploration of the Mandelbrot set, by providing 
a ZOOM OUT as well as a ZOOM IN option. 

The ZOOM procedure can be summarised as 
follows;- 

1) Enter zoom facility by pressing the <left> 
button. 

2) Move the mouse to position the zoom area at 
the region of interest. 

3) Scale the zoom area to the required size, by 
pressing the <left> and/or <middle> 
buttons. 


4) FIX the zoom area at this position by 
pressing the <right> button. 

5) Press <ieft> or <middle> button to select 
ZOOM IN or ZOOM OUT respectively. Or 
press <right> button to QUIT selected 
region and re-position the zoom area. 

The zoom facility can generate two types of 
error. Both errors arc indicated by a bong sound, 
and the automatic re-positioning of the zoom 
area. 

The first error is produced when an attempt is 
made to zoom in to an area that is too small to be 
represented by the program’s current position. 

The second error is produced when an attempt is 
made to zoom out to an area, that is too large to 
be represented by the program. 

The user may press <escape> at any time, to 
return immediately to the initial screen; 

The Quit option has been removed from the 
zoom facility and replaced by CONTINUE. 
This allows the user to abort the zoom facility 
and resume plotting the current screen. 

Setting up the program 

1) Enter *CONFIGURESPRITESIZE 10 and 
then press <ctrl-break>. 

2) Enter the program and SAVE to disc. 

3) In immediate mode, enter PROCsetup 
<retum>. This will plot the initial 
mandelbrot screen and SAVE it to disc as a 
sprite. 

4) If PROCsetup is not required, it can be 
deleted and the program re-SAVEd. 

5) RUN the program. After a few seconds you 
will be presented with the initial mandelbrot 
screen. 
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Mandelbrot Program 


10 REM > $,mandelbrot 

20 REM — By William Doggett — 

30 REM — Leeds 

40 REM -- Version 2,3 
50 REM — (c) 07/02/88 

60 MODE 13:FRQCinit 
70 ON ERROR PROCerror 
80 PROCmain 
90 END 
100 

110 DEFPROCmain 

120 COLOUR 30:CLS 

130 PRINTSPC72"PRESS" 1 '"LEFT" 11 

"MOUSE"* 1 "BUTTON "* * "FOR" 
''"ZOOM" 11 "FACILITY" 

140 CASE TRUE OF 

150 WHEN b%=0 

160 x=-2: y-~ 1.25:s=2 * 5 

170 *SCHQOSE mandelsprite 

180 CLG:PLOT &ED,0,0:Y%=1024 

190 WHEN b%=l AND Y%<1024 

200 C%-=Y%DXV4*D% 

210 PROCmandelbrot(Y%> 

220 WHEN b%=2,b%=4 

230 !scrnstore=&lFD8000 

24 0 CLG rFROCmandelbrot(0) 

250 ENDCASE 

260 PROCdelay(50):*FX 21,9 
270 REPEAT MOUSE x%,y%,b% 

2B0 UNTIL b%-4 

290 ERROR 999, "ZOOM" 

300 ENDFROC 
310 

320 DEFPROCmandelbrot(A%) 

330 PROCdelay(50): *FX 21,9 
340 FOR Y%=A% TO 1020 STEP 4 
350 MOUSE x%,y%,b% 

360 IF b%=4 ERROR 999,"ZOOM" 

370 C%-=D%:CALL MAND 

380 NEXT 
390 ENDPROC 
400 

410 DEFFROCerr or 

420 IF ERR-17 b%=0 

430 IF ERR=999 PROCzoom 

440 IF ERR017 IF ERR0 999 PRINT 

REPORT?" at line ERL:END 
450 ENDPROC 
460 

470 DEFPROCzoOm 
480 LOCAL X%, Y% 

490 GCOL 3,63 


REPEAT nx=x:ny=y:ns“5 

PROCdelay(50) rPROCselectarea 
PROCdelay(50):FROCselectzdom 
UNTIL b% 
x=nx :y=ny:s=ns 
i=s / 25 6: D %=FNbi {i) 

B%-FNbi{x“i):C%=FNbi (y+S+i) 
ENDPROC 

DEFFROCselectarea 
X%=448:Y%=448;S%=126:*FX 21,9 
MOUSETO X%,Y% 

RECTANGLE X%,Y%,S% 

PROCcontrols(1):PROCarea 
REPEAT OX%=X%:OY%=Y%:OS %=S % 
MOUSE X%,Y%,b% 

CASE b% OF 

WHEN 2;PROCdelay(1) 

IF S%>24 S%-=4:PROCarea 
WHEN 4:PROCdelay(1) 

IF S%<1000 S%+=4:PROCarea 
IF X%+S%>1023 X%-=4 
IF Y%+S%>1023 Y%-=4 
ENDCASE 

IF GX%<>X% OR OY%OY% OR 


ENDPROC 

DEFPROCselectzoom 
PROCcontrols(2):*FX 21,9 
REPEAT MOUSE x%,y%,b%:UNTIL b% 
CASE b% OF 
WHEN 1 

WHEN 2:ns=lG24*s/5% 
nx-=FNont(X%):ny-=FNout(Y%) 
IF FNbi(ns)>FNbi{7} b%=0 
IF ABS FNbi (nx) >FNbi (7) b%^0 
IF ABS FNbi(ny)>FNbi(7) b%=0 
WHEN 4:ns-FNin(S %) 
nx+=FNin(X%);ny+=FNin(Y%) 

IF INT FNbi(ns/256)=0 b%=0 
OTHERWISE b%*=0 
ENDCASE 
IF b%=0 VDU 7 
RECTANGLE X%,Y%,S% 

ENDPROC 

DEFFNin(A%)=A%DIV4 * s/2 5 6 
DEFFNout£ A%)=A%DIV4 *ns /2 5 6 
DEFFNbi (A) =A* U«27) 


500 

510 

52 0 

530 

540 

550 

560 

570 

580 

590 

60 0 

610 

62 0 

630 

640 

650 

660 

670 

680 

690 

700 

710 

720 

730 

740 

750 

760 

770 

780 

7 90 

800 

810 

82 0 

B 30 

840 

850 

860 

0 70 

880 

090 

900 

910 

920 

930 

940 

950 

960 

970 

980 

990 

1000 


Archive April 1988 


21 






Mandelbrot Program 


1010 DEFPROCbox 

1020 WAIT:RECTANGLE OX%,GY%,05% 

1030 RECTANGLE X%,Y%,S% 

1040 ENDPROC 
1050 

1060 DEFPRQCarea 

1070 MOUSERECTANGLE 0,0,1023“S%, 

1080 ENDPROC 1023-5% 

1090 

1100 DEFPROCcontrolS(A%) 

1110 CLS:COLOUR 30:PRINTTAB(0,4) 

"LEFT:"TAB[0,14)"MIDDLE: 

_ 11 TAB [0,24) "RIGHT:" 

1120 COLOUR 40 

1130 IF A%=1 PRINTTAB (0,6)"Increase” 
TAB < 0,16) "Decrease ,, TAB {0,26) "Fix" 
1140 IF A %—2 PRINTTAB(0,6)"Zoom in" 
TAB (0,16) "Zoom out "TAB (0,2 6) 


1150 
1160 
1170 
1180 
1190 
1200 
1210 
1220 
1230 
1240 
1250 
1260 
1270 
1280 
1290 
1300 
1310 
1320 
1330 
1340 
1350 
1360 
1370 
13B0 
1390 
1400 
1410 
1420 
1430 
1440 
1450 
14 60 
1470 
14 80 


ENDPROC 


"Continue" 


DEFPRGCdelay(D%) 
TIME=0 

REPEAT UNTIL TIME>D% 
ENDPROC 


DEFPROCinit 
DIM code 1024 
FROCassembie:*$NEW 
VDU 28,32,31,39,0 
VDU 24,0;Q;1Q2Q;1G2G; 
OFF 

b%=0:*SLQAD $*sntandel 
ENDPROC 


DEFPROCassemble 
ncol=Q:u=l:v=2:i~3 
screen=4:count=5 
ocol=6:xcoord=7:word=8 
x=4:y=5:x2 = 6:y2=7:sign=8 
lhs=9:rhs=10 
destL-11:destH-12 
tmp=5:tmp2=ll 
sp=13:1ink=14:pc=l5 
FOR I%=0 TO 2 STEP 2 
PROCsourcecode {!%) 

NEXT 

ENDPROC 

DEFPROCsourcecode(1%) 

P%=code 

[OPT 1% 

.MAND 


14 90 

STMFD 

(sp)!,{link) 

1500 

LDR 

screen,scrnstore 

1510 

MOV 

count,#0 

1520 

MOV 

ocol,#0 

1530 

MOV 

word, #0 

1540 

MOV 

xcoordf#0 

1550 

. loopX. 


1560 

ADD 

u,u, i 

157 0 

BL 

iterate 

1580 

TEQ 

ncol,ocol,LSR #24 

1590 

BLNE 

draw 

1600 

ADD 

count,count,#1 

1610 

TEQ 

count,#256 

1620 

BNE 

loopX 

1630 

BL 

draw 

1640 

ADD 

screen,screen,#64 

1650 

STR 

screen,scrnstore 

1660 

LDMFD 

(sp) !, {pep 

1670 



1680 

,iterate 

1690 

STMFD 

{sp)! f (4,5,6,7,8) 

1700 

MOV 

x, #0 

1710 

MOV 

Y, #0 

1720 

MOV 

ncol,#256 

1730 

.repeat 

1740 

;get absolute values 

1750 

EOR 

sign,x,y 

1760 

TEQ 

x,#0 

1770 

R5BMI 

x,x,#0 

1780 

TEQ 

Y, #0 

1790 

RSBMI 

YiYf#0 

1800 

/perform x2 — x * x 

1810 

MOV 

Ihs,x,LSR #16 

1820 

BIC 

rhs,x,Ihs,LSL #16 

1830 

MUL 

destH,Ihs,Ihs 

184 0 

MUL 

Ihs,rhs,Ihs 

1850 

MUL 

destL,rhs,rhs 

I860' 

ADDS 

destL,destL,Ihs, LSL 

1870 

ADC 

destH,destH,Ihs,LSR 

1880 

MOV 

x2,destL,LSR #27 

1890 

ORR 

x2,x2,destH,LSL #5 

1900 

/perform y2 = y * y 

1910 

MOV 

Ihs,y,LSR #16 

1920 

BIC 

rhs,y,Ihs,LSL #16 

1930 

MUL 

destH,Ihs,Ihs 

1940 

MUL 

Ihs,rhs,Ihs 

1950 

MUL 

destL,rhs,rhs 

1960 

ADDS 

destL,destL,Ihs, LSL 

1970 

ADC 

destH,destH,Ihs, LSR 

1980 

MOV 

y2,destL,LSR #27 

1990 

ORR 

y2,y2,destH,LSL #5 

2000 

/perform y = 2*x*y+v 

2010 

MOV 

destH,y,LSR #16 

2020 

BIC 

rhs,y,destH,LSL #16 

2030 

MOV 

tmp,x,LSR #16 

2040 

BIC 

Ihs,x,tmp,LSL #16 
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2050 

MUL 

destL,lhs, rhs 


2060 

MUL 

rhs,tmp,rhs 


2070 

MLA 

lhs,destH,lhs,rhs 


2080 

MUL 

destH,tmp,destH 


2090 

ADDS 

destL,destL,lhs,LSL 

#16 

2100 

ADC 

destH,destH,lhs,LSR 

#16 

2110 

MOV 

y, destL,LSR #27 


2120 

ORR 

y,y,destH,LSL #5 


2130 

MOVS 

sign,sign 


2140 

RSBMI 

y,y,#o 


2150 

ADD 

y, v,y,LSL #1 


2160 

;perform x = x2 - y2 + u 


2170 

SOB 

X, x2, y2 


2180 

ADD 

X, x,u 


2190 

;loop 

again? 


2200 

ADD 

lhs,x2,y2 


2210 

CMP 

lhs,#FNbi(4) 


2220 

BHS 

return 


2230 

SUBS 

ncol,ncol, #1 


22 40 

BNE 

repeat 


2250 

.return 


2260 

LDMFD 

<sp) !, {4,5, 6, 7, 81 


2270 

MOV 

pc,link 


2280 




2290 

.draw 



2300 

MVN 

rhs,#0 


2310 

AMDS 

lhs,xcoord,#3 


2320 

BEQ 

over 


2330 

MOV 

tmp2,lhs,LSL #3 


2340 

BIC 

word,word,rh s, LSL tmp2 

2350 

ORR 

word,word,ocol, LSL tmp2 

2360 

RSB 

lhs,lhs,#4 


2370 

ADD 

xcoord,xcoord,lhs 


2380 

CMP 

xcoord,count 


2390 

STRLS 

word,[screen],#4 


2400 

BHS 

finish 


2410 

.over 



2420 

MOV 

word,ocol 


2430 

. loop 



2440 

SUB 

lhs,count,xcoord 


2450 

CMP 

lhs,#8 


2460 

STRHS 

word,[screen] , #4 


2470 

STRHS 

word,[screen],#4 


24 8 0 

ADDHS 

xcoord,xcoord, #8 


2490 

BHI 

loop 


2500 

SUB 

lhs,count,xcoord 


2510 

CMP 

lhs,#4 


2520 

STRHS 

word,[screen],#4 


2530 

ADDHS 

xcoord,xcoord,#4 


2540 

.finish 


2550 

MOV 

xcoord,count 


2560 

ORR 

ocol,ncol,ncol,LSL 

#8 

2570 

ORK 

ocol,ocol,ocol,LSL 

#16 

2580 

MOV 

pc,link 


2590 




2600 

,scrnstore 



2610 EQUD 0 
2620 1 

2630 ENDPROC 
2640 

2650 DEFPROCsetup 
2660 LOCAL ERROR 

2670 ON ERROR LOCAL PROC sprite :END 
2680 MODE l3:PROCinit 
2690 ENDPROC 
2700 

2710 DEFFROCsprite 
2720 x=-2 t y--l* 25 j s=2,5 
2730 i=s/256:D%-FNbi(i) 

2740 B%=FNbi(x-i) :C%-FNbi (y-i-s+i) 
2750 l scrnstore=&lFD80G0 
2760 CLG:PROCmandelbrot(0) 

2770 MOVE Q,Q:MOVE 1023,1023 
2780 *SGET mandelsprite 
2790 *SSAVE $*smandel 
2800 ENDPROC g] 
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New Life!? 




Modifications to last month's Life program 

There was a mistake in the “tumbler” picture 
which was supposed to be an oscillator. It should 
have had an extra block at each of the two bottom 
comers. 

If you want to try some of the larger patterns, 
Tony Brain has given us some modifications 
which make the program work with a field of 
160 by 120 cells. If you typed in the program 
from the magazine then the following lines need 
to be typed in. Note that the blank lines are 
significant-they delete existing lines that are no 
longer needed. 

10 REM >Life_160 

15 REM Alterations to Life to give 
160 x 120 field. 
320 DIM code% 25000,o$block% 16 
570 FOR no%=0 TO 19516 STEP 4 
660 ? (array%+1770+RND [140) +■ 

(160*RND[100)))=1 
810 X%-=X% MOD 8 : Y%--Y% MOD 8 
990 GCOL4,0:MOVEX%“4,Y%-4 
1000 PLOT1,12,0:PLOTl,0,8 
1010 PLOTl,“12,0:PLOTl, 0,-8 
1150 GCQL2:RECTANGLE PILL pos%,0 f 

len%,63 

1360 POINT X%, ¥%:POINT X% + 2,Y% 

1480 =array%+(X%/8)+{128-¥%/8)*160 

1510 rows%=l2 0 : co.lumns%=l 60 

1580 live_no=ll:sp-13 

1630 EQUD 0;EQUD 1;EQUD 2:EQUD 160 

164 0 EQUD162 t EQUD 320:EQUD321:EQUD322 

1645 .end EQUD end% 

1680 ADR pointer,end 

1690 LDR array_end,[pointer] 

1695 SUB array_end,array_end, #320 

1730 MOV loop_eount,#28 

1750 LDR offsetvalue,[pointer, 

loop_countl 

1790 SUBS loop_count,loop_cOunt,#4 
1800 

1810 BGE count 

1820 LDRB cellvalue,[array^addr 

,#161] 

1920 STRB cellvalue,[arrayaddr 

,#161] 


2050 

2080 .display 
2120 

214 0 ADD arrayaddr,array_addr ,#160 
2170 

2260 MOVEQ colour,#£ll 
2270 
2280 

2290 STRB colour,[scrnaddr,#320] 

2300 

2310 

2320 ADD scrn_addr,scrnaddr, #2 
2350 ADD scrn addr,scrn_addr, #320 
2380 STR live_no,number 
2430 P%+=19520 

If you bought the program disc, you will have a 
version of the program which we modified to 
allow you to load and save patterns on disc. If 
you have that version then these are the 
modifications needed. 

10 REM >Life_160 

15 REM Alterations to Life to give 
160 k 120 field. 

340 DIM code% 25000,osblock% 16 
590 FOR no%=0 TO 19516 STEP 4 
680 2 (array%+177Q+RND[140)+ 

(160*RNB (100)))=1 
830 X%”=X% MOD B:Y%-=Y% MOD 8 
1010 GCOL4,0:MOVEX%-4, Y%-4 
1020 PLOT1,12,0iPLOT1,0,8 
1030 PLOTl,-12,0:PLOTl, 0,-8 
1170 GCOL2:RECTANGLE FILL pos%,0, 

len%,63 

1380 POINT X%,Y%:POINT X%*2,Y% 

1500 =array%+(X%/8)+(128-Y%/8)*160 
1760 OSCLI ( f> SAVE $. LIFE. SCREENS . n + 

f ilenaTne$ + ,t " + STR$~ (array%) + M 
" + STR$*- (end%) ) 

2360 rows%=120:colunins%=l60 

2430 live_no=ll:sp=13 

2480 EQUD 0:EQUD 1:EQUD 2:EQUD 160 

2490 EQUD162:EQUD32Q:EQUD321:EQUD322 

2495 .end EQUD end% 

2530 ADR pointer,end 

2540 LDR array_end,[pointer] 

2545 SUB array_end,array_end,#320 

2580 MOV loop_count,#28 

2600 LDR offset_value,[pointer, 

loopcount] 
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2640 SUBS Ioop_COunt, loop_COurtt, #4 
2650 

2660 BGE count 

2670 LDRB cell_value,[array addr 

,#1613 

2770 STRB cellvalue,[arrayaddr 

,#161] 

2900 

2930 ,display 
2970 

2990 ADD array_addr,array_addr,#160 
3020 

3110 MOVEQ colour,#&11 

3120 

3130 

3140 STRB colour,[scrnaddr,#320] 

3150 

3160 

3170 ADD scrnaddr,scrnaddr,#2 
3200 ADD scrn addr,scrn_addr,#320 
3230 STR liveno,number 
32B0 P%+=19520 

This month’s program disc contains the 
modified programs pins a number of classical 
patterns for yon to try out for yourself. 0 

Bug or Feature? 

* ‘OSJSpriteOp’: As you may well have 
noticed, the sprite editor does not work properly 
on 1.2 OS and the reason for this is a bug is 
t OS_SpriteOp 1 call. This bug seems which has 
been introduced in 1.2. It returns bogus values 
for some colours when used to get the colour and 
tint of a pixel. 

* In modes 18 to 20, the pointer does indeed 
'break up’ when it reaches the right hand side of 
the screen - I don’t know if this is a hardware 
fault or software. (1*11 tell you when I get my 2,0 
OS!) Cou Id it perhaps be linked with the * shift to 
the right’ which occurs on some multi-sync 
monitors when you go into the hi-res modes? 

* Problems with TRACE - this was reported 
last month, but one reader tells us that Acorn say 
this is ‘not a bug, but a result of the speed of 
BASIC 5.’ Hmm!?0 


. ••••■•• • • • ■ ■ ■ ■ ■ ■ ■ 

‘C’ Book Review 

■; ...^_ t. _ \ _ _ _ _ __ 

“The C Book: featuring the draft ANSI C 
standard” by Mike Banahan, published by 
Addison Wesley at £15.95, (ISBN 0-201- 
17370 - 0 ) 

Anyone who has purchased Acorn’s C compiler 
for the Archimedes will find this newly 
published book extremely useful Acorn’s 
implementation of C conforms very closely to 
the latest ANSI draft standard for the language 
but the user guide gives very little description of 
the language and most available books on C 
were written well before the draft standard and 
are seriously out-of-date. 

Mike Banahan’s book gives a lot of its library 
functions in such a way that it can easily be used 
as a ‘user guide’ for C on die Archimedes (or 
other new standard-confomiing C compilers, 
such as Microsoft C version 5 for IBM 
compatibles). The style of the book is such that 
not only is it very readable for those who already 
know earlier versions of C but it would also 
serve as an excellent introduction for anyone 
who can program In BASIC, Pascal, Fortran or 
assembler but is new to C 0 

Colin Deans, 

- -_ . ... 

Readers Comments 

I_ ■.. .1_: : :■. 

A chance here for readers to put their own view 
about anything vaguely to do with Archimedes 
and/or Archive. Preferably only polite and 
constructive comments, please! 

- DFS to ADFS utility. One reader comments 
that having attached a 5,25 M disc drive to the 
Archimedes, CJE Micro’s utility for reading 
DFS discs puts the serial link set-up into the 
stone age! 0 
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FORTRAN 77 on the Archim ed es 


Leslie and Gwyneth Pettit 

As Fortran users for 28 years we were eagerly 
anticipating our Archimedes 440 with the 
A corns oft Fortran 77 compiler. Have we been 
disappointed? The short answer is No; the 
machine and the implementation of Fortran 77 
are both excellent. The documentation and 
graphics extensions fall a long way short, 
however, and the speed of compiled programs is 
disappointing as a result of the absence of a 
maths co-processor. The actual compiler is very 
fast and efficient compared with other micro 
implementations of Fortran and the final object 
code is comparatively compact. The major 
problem comes in actually implementing the 
necessary commands, especially when using a 
hard disk system, and in compensating for the 
shortcomings of the documentation. 

Perhaps only experienced Fortran users will 
want to use Fortran 77 on the Archimedes, but 
even they will need more information on 
libraries and the linking stage, particularly if 
working from a hard disk. If you already have a 
300-series Archimedes and are considering 
buying the Fortran 77 compiler, we are not 
claiming that the Archimedes 440 is essential for 
Fortran, but its 4 Mb memory and the hard disk 
are an ideal Fortran environment. 

Terms of Review 

We have compared Acomsoft Fortran 77 with 
other micro-computer implementations - 
specifically, with A com 32000 Fortran 77 under 
Panes on the A com 32016 co-processor and 
with IBM Professional Fortran and Prospero 
F77 on IBM compatible micros. These are the 
Amstrad 1640 (8086 CPU) and the Elonex 
(NEC V27 CPU), both having the 8087 co¬ 
processor and a 20 M hard disk. We also have 
experience of using Fortran on mainframes 


(CDC 1604 and Amdahl) and mini-computers 
(VAX and Data General NOVA) though these 
are relevant only as background experience. 

This review divides into two parts - some 
helpful advice, to make the first steps for new 
users less traumatic, followed by quantitative 
comparisons (the term benchmark can be 
misleading) on Archimedes Fortran 77 
compared with other micro versions. 

First Steps with Fortran on the 
Archimedes 

Acomsoft Fortran 77 arrives on a 3.5" floppy 
disk with a slim spiral bound handbook and 
instructions for separating the compiler and 
linker onto two floppy disks for normal use. 
There are no explicit instructions for putting it 
on a hard disk (as are provided with the Acorn 
32016 languages) which would be helpful for 
users who are not even familiar yet with ADFS. 

There is no editor included, although it is 
essential to be able to enter Fortran source code 
in text format, or edit it after transfer from 
another machine. Advertisements claim that 
Arc Writer is provided with the Archimedes 440 
- it has not yet materialised ! However any text 
editor (e.g. Wordwise, View or Edit) will do, 
provided you are prepared to replace line feed 
characters (&0A) with carriage returns (&0D) if 
you are working from within the 6502 emulator. 
By the way, you may like to know that you can 
exit the emulator to return to your working 
directory with the command *QUIT, 

Fortran for Beginners 

Before we tackle specific problems of Fortran 
on the Archimedes, we shall outline the way it 
operates, for those who may be unfamiliar with 
a compiled language. Wc shall assume you have 
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become familiar with ADFS and iis directory 
structure, and we shall first assume that you are 
using Fortran from the floppy disk drive. 

The Fortran 77 compiler and linker use 
directories f77 (for the source code), AOF (for 
the object-code Archimedes Object Format 
files) and TMP (for storing temporary code). 
They also require a directory LIBRARY for the 
necessary libraries etc. and a directory 
EXECLIB to hold command files. 

Compilation of Fortran source-code to an 
object-code version in directory AOF takes 2 
passes, using the 'Front End\ called f77fe, for 
the first pass followed by the ‘Code Generator\ 
called f77cg. Intermediate code is stored as a 
temporary file (TMPTcode) in directory TMP. 
These steps can be performed sequentially, 
using the command file f77 provided on the disk 
in directory EXECLIB. Tf you only want to 
check your syntax, however, you can call the 
front-end pass separately and the manual does 
describe in adequate detail how to invoke both 
passes independently. 

After compilation, the object-code (AOF) file is 
linked with the Fortran 77 library using the 
universal Archimedes linker. Documentation 
on the linker is very meagre in the Fortran 
handbook, which points you to the Programmers 
Reference Manual (Appendix B), but the 
‘linkf77 T command file in directory EXECLIB 
will supervise the operation provided you do not 
wish to link more than one AOF file. Most 
working programs will require the linking of a 
number of compiled program modules and the 
Reference Manual suggests this command to 
link multiple object-code modules named 
AOF.Progl, AOF.Prog2 etc.; 

Link AOF.Progl, AOF.Prog2, .., 

-library lib.f77 -image 
<progname> 


You can also obtain information on link options 
by typing the command LINK -HELP at the 
keyboard. 

Running Your Fortran Program 

The linker generates an executable program 
l progname’ in the current directory (which is the 
root directory on the floppy disk as supplied), 
which can be run by typing the command 

*progname 

Working Directories on the Hard Disk 

On a hard disk, the root directory can easily 
become cluttered with out of date files, which 
make disk housekeeping very tedious. We 
decided the most efficient structure was to add 
only the Acomsoft directories EXECLIB and 
TMP to the root directory, which already has a 
sub-directory LIBRARY. Directory EXECLIB 
contains the command files f77 and linkf77, and 
LIBRARY must have the Fortran library files 
added. Initially, directory TMP will be empty. 

We created a new directory called Fortran and 
used this as our working directory, with sub¬ 
directories f77 (for source-code) and AOF (for 
object-code). We had to create another sub¬ 
directory here called TMP (both TMP 
directories appear to be necessary for the 
command files to work). You can, of course, 
include any other sub-directories you find 
necessary for efficient storage and retrieval of 
your source-code files or your fully compiled/ 
linked programs. The problem of ihe hard disk 
was more acute since we were adding the C 
compiler at the same time, which could have 
inflated the entries in die root directory to 
u nacceptable p ropo rt ions. 

Having created these directories, and using 
Fortran as the current directory, the A com 
command files f77 <fname> and linkf77 
<fname>, or the command string given above, 
will work correctly and all file references will 
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find their targets. The final executable program 
appears in directory Fortran, and is called by the 
command *<fname> - but never forget that the 
floating point emulator has first to be loaded 
with the command *fpe, Once the file has been 
correctly compiled and linked, you can 
optionally transfer it to one of your other 
subdirectories to keep the working environment 
uncluttered. 

Writing your own Command Files for 
Compiling/Linking 

Command strings like the link command shown 
above eau be typed in dynamically or for 
repeated use they can be constructed via 
*BUILD <name> (or by using a text editor) and 
executed with the command *EXEC <name>, If 
you subsequently set their filetype to &FFE you 
can execute them by typing just *<name>. 

The shortcoming of constructing your own 
command strings is that each command file must 
name its target files explicitly, whereas 
Acomsoft’& 177 and link 177 will accept 
filenames as parameters. The format of the 
Acomsoft command files is similar to those of 
Panos on the 32016, but we cannot find any 
explanation as to how they are implemented on 
the Archimedes! Will anyone volunteer to write 
an article on the use of files in the EX EC LIB 
directory ? 

In particular, the Fortran 77 Release Note states 
that you if you have the command file f77 in 
directory EXECLIB , you must have a 
companion file named 177 in the library 
directory. The format of the companion file, and 
the connection with the link file, is nowhere 
explained and even with a 20 Mbyte hard disk, 
the space for all the companion files, if you have 
a number of command files, seems profligate. 

Acomsoft Command Files 

The contents of the command file f77 in excel ib 
are; 


, Command sequence to compile Fortran 

, f77 source [-object obj] [-opt 

options] f-m n] 

, Requires directories £77, aof and 

tmp. 

.key from/a, object/k r opt/kjrin/k 
f7 7fe f77 * <from> -to tmp .fcode “Opt 

<opt$+> 

f77cg tmp.fcode -to aof.<object$ 

<from> -opt m<m$2Dxopt$+> 
remove tmp.fcode 

As you see, it uses commands prefixed with a 
full stop, which are not documented in either the 
Archimedes User Guide or Programmers 
Reference Manuals. This format resembles the 
Panos command language of the 32016 with 
which we are familiar, but unfortunately it is not 
identical, so the Panos guide is not sufficient. In 
particular, the keystring beginning with .key is 
not defined and the Panos range of key words and 
arguments, which is extensive, may not all apply 
to the Archimedes. 

We would have liked lo set up, for example, 
similar keystring command files for each pass 
(f77fe and f77cg) to be called separately. 
Operation of fe and eg, which are fortunately 
clearly documented, can still be simplified in use 
by setting up aliases-it would have been helpful 
if the documentation had given some sample 
alias.S suggestions. Our suggestions are these:- 

*set alias$fe "£77fe £77.%0 -to 

TMP, fcode 11 

*set alias$cg r ‘f77cg TMF . f code -to 

AGF.% 0" 

You can then type these brief commands 

fe <progname> 
eg <progname> 

to implement both passes of the compiler; the 
parameter <progname> is substituted for %Q in 
the aliases above. 
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Using Graphics with Fortran 77 

Archimedes graphics can be used in Fortran 
programs, provided they have equivalent VDU 
commands - but why don't Acorn provide a 
starter library of graphics subroutines, as they 
did for the 32016 ? There are no demonstration 
programs on the disk (apart from the minimal 
test program 'Hello World') unlike most 
suppliers of Fortran for die IBM micros who 
provide a variety of demonstrations. Even the 
Acorn *C* compiler has some demonstration 
software. It is even more unfortunate that the 
example on using VDU control codes in the 
Fortran manual contains prehistoric Hollerith 
characters! 

Here then is a sample subroutine to perform a 
PLOT command — all other VDU commands 
can be implemented similarly: 

INTEGER num,x,y 
CALL PLOT(nun,x,y) 

SUBROUTINE PLOT(num,xl, yl) 

INTEGER num,xl,yl 

WRITE(6, 1 (6A)') CHAR(25),CHAR (num ), 
CHAR(MOD (xl,256]), + CHAR(xl/ 
256) , CHAR (MOD (yl, 256) } 

,CHAR(y1/256) 

END 

(This routine assumes channel 5 is not con¬ 
figured as a printer channel). 

Users not familiar with BBC BASIC and the 
VDU control codes may not be aware that VDU 
25 is equivalent to the BASIC keyword PLOT; 
num is used here as the PLOT code, where 
MOVE requires num-4 and DRAW num=5. 
The same users may also be unaware that since 
VDU codes are limited to the range 0 to 255, 
screen codes (which may exceed this range) are 
sent as <low byte> followed by chigh by to. 

Compatibility 

Every source program using legal Fortran 77 (or 
66) code which we tried out was compiled and 
linked satisfactorily. The compiler is in fact 


slightly more rigorous than the IBM compilers, 
which had allowed unprofessional jumps into 
IF-structures. Problems arise when your 
program tries to access the Archimedes 
operating system to take advantage of the 
wonderful facilities available there. There 
appears to be no way of accessing the operating 
system variables, not even time and date, and the 
32016 system calls such as 1FCOMMAND 
LINE are not implemented. 

Clearly, taking advantage of sophisticated 
Archimedes facilities such as sound, window or 
OSBYTE calls (e.g. to flush the keyboard 
buffer) is very important if Fortran programs are 
to exhibit the Archimedes to advantage. If Acorn 
cannot release details of general access, they 
could perhaps provide a disk of utility 
subroutines. It is also essential to be able to 
incorporate machine-code routines for plotter- 
drivers and graphics tablets if full graphics 
performance is to be feasible. 

We were further disappointed in a spirited bid to 
access the operating system indirectly through 
‘C’ AOF fi les, having been led to believe that the 
linker could include any files in AOF format, but 
this only produced a rich variety of obscure error 
messages. After much experimentation we 
found, buried in the Programmer's Reference 
Manual at the bottom of page 636, the statement 
that C can call Fortran but that Fortran cannot 
call G Our only hope therefore lies in a utilities 
package from some informed source , if we wish 
to do more than add standard VDU graphics to 
Fortran programs. 

Working Comparisons 

Once a program has been written, how docs it 
compare with IBM implementations of Fortran? 
Firstly the compilation stage is much faster. A 
typical program unit (360 lines) took the 
following compilation times: 
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Amstrad (IBM Professional Fortran) 184 secs 
Amstrad (Prospero F77) 83 secs 

A com 32016 co -p roces sor 98 secs 

Archimedes 21 secs 

Execution times did not compare so favourably. 
The following are figures obtained using a 
powerful program, SUPERQIJAD, used in 
chemistry for calculating stability constants of 
metal complexes. SUPER QUAD is essentially a 
least squares minimization program — if you 
want more details, look up Journal of the 
Chemical Society, Dalton Transactions, 
1985,1196. These were the times required for 
the solution of 252 equations for 171 unknowns: 

Amstrad 1640 (8087 co-processor) 42 secs. 
A com 32016 c o -proce sso r 3 8 se cs. 

Archimedes 47 secs. 

Code generation does appear to be more 
efficient on the Archimedes, where the code size 
of 201,144 bytes was 20% less than on the 
Amstrad 1640 (253,302 bytes). 

Comparison with BBC BASIC 

The program SUPERQUAD has been translated 
into BBC BASIC and on the MASTER 128 
(using code overlays) the time required for the 
same set of equations was 1474 secs. (725 secs, 
with the turbo card). On the Archimedes in 
B ASIC V, where the code requires no overlays, 
the times taken were 105 secs, in ROM BASIC 
and 79 secs, in RAM BASIC. Since these arc 
timings for an executed language, requiring no 
overheads of compiling and linking, fully 
structured and permitting free access to the 
operating system, you could be forgiven for 
retaining BASIC as your working language, 
with its advantages of interpretive development, 
unless you already have Fortran source code 
written and tested on another system. 


In Fortran, Archimedes is Slower... 

The quoted timings highlight the greatest 
weakness of the Archimedes when used for 
mathematical calc illations, since the software 
floating point emulator is no match for a maths 
co-processor. Until one is available there is little 
to be gained speed-wise compared to IBM 
compatibles, particularly when comparing with 
the 286/386 machines, unless much time is spent 
on co mpiling and linkin g d u ri ng dev elopment. 

„,but Bigger 

Where the Archimedes does gain (apart from 
fast compilation and linking) is its potential to 
hold much larger programs. IBM machines are 
limited to 640k until the OS/2 system is 
introduced, while on the Archimedes 440 we 
have up to 4 Mbyte. It should be possible to 
transfer from mainframe computers many 
existing professional and scientific programs 
(such as those used in chemistry for displaying 
crystal structures) which, at the moment, cannot 
be squeezed into IBM micros. With the promise 
of a full RISC set in the future, including a 
floating-point processor, an exciting world of 
applications is open to the Archimedes and its 
users. (3 


In the light of comments made in the above 
article, Leslie and Gwyneth, and no doubt many 
others will he pleased to see the contents of the 
advertisement opposite , We have been promised 
a review copy and hope to have some comments 
in time for the next issue. 
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New software for the Archimedes 


FORTRAN Graphics Library 

A library containing over 90 
subroutines to sad powerful 
graphics capabilities to the 
Acorn FORTRAN 77 compiler. 

Provides equivalents for BASIC 
graphics statements (CIRCLE etc) * 

Also includes a comprehensive 
set of routines for generating 
sophisticated graphs, histograms, 
pie charts, etc. either on the 
monitor or on HFGL-compatib1e 
plotters (e , g . HP 7475A) . 

The XED Text-File 

The ideal editor for Pascal* FORTRAN and C programs, command 
files, etc. Powerful full screen editor using 40, 00 or 132 
column screen modes and all ASCII characters O — 255, plus 
comprehensive mainframe-style editing language including 
sophisticated file input/output and facility to execute 
command files. Full access to ^-commands plus ability to 
compile and run programs, enter BASIC* etc* while editing* 
without loss of current text. 

Printer Module E 12.50 

Tired of having to wait while files are printed? Load our 
Printer Module from disc and your Archimedes instantly has a 
very versatile printer buffer (size 1 Kbyte up to maximum 
available RAMI that allows you to carry on programming while 
your printer is churning out paper. Module also has very 
fast text and graphics screen dumps for Epaon-FX compatible 
printers* and commands to send text files to the printer. 


Each package is supplied on disc and includes a comprehensive 
user guide. FORTRAN Graphics Library and XED Editor both 
require machine with at least i Mbyte of RAM. 

Please write for further details, or send your order with a 
cheque or P.D. payable to *CCD Computer Services'. 

No credit cards please. All prices fully inclusive. 

Official orders from Universities ( Govt. Labs, etc welcome. 


CCD Computer Services 

7i Marlborough Park Avenue, SIDCLJP* Kent DAIS 9DL. 
Tel. 01-302 5427. 



Editor £ 19.50 
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The Floating Point Emulator 






A. J. Smith 


There has been talk recently of my current pet 
project - the Floating Point Emulator. 1 myself 
have had a few problems, but these have been 
mainly due to inadequacies in the Programmers' 
Reference Manual. 

I have (1 think) successfully converted Barry 
Biddle’s Julia and Mandelbrot programs into 
machine code, using floating point arithmetic 
with the aid of the emulator. Dismayed at the 
BASIC assembler for not assembling these 
opcodes (especially since *MEMORYl appears 
to disassemble them!) I decided to write my own 
assembler. Unfortunately, after almost 
completing my masterpiece I realised that the 
binary format of the CMF/CNF/CMFE/CNFE 
instructions is not listed. In desperation I turned 
to Peter Cockerell’s otherwise excellent book to 
find the same information missing. As I am sure 
you realise, floating point algorithms are rather 
awkward to write without being able to do 
comparisons of floating point numbers. 

My problems were compounded when the 
Debugger (Arthur 0.3) refused to disassemble 
correctly. The version supplied with Arthur 1.2 
is better, but still incorrect! Even still further, 
page 580 of the Reference Manual has a table 
headed “e” and “f\ Replacing these headings 
with “g” and “h” respectively certainly aids 
assembling, whether by assembler or by hand. 

I have since done some painstaking trial-and- 
error work to determine the binary format of the 
compare instructions - with a bit of help from the 
output of the ANSI C compiler. The format as I 
have worked it out is: 

Bits Contents 

31 -28 <cond> 

27-24 1110 


23-21 <abc> (opcode) - see below 

20-19 10 

18-16 <Fn> 

15-4 11110001 0001 

3 <i> (immediate) - see below 

2-0 <Fm> or cimmediate value> 

Notes 

<cond> and cimmediate value> have the same 
values as for all other F.P. instructions. This is 
where the manual can be believed! 

<abc> can take the following values for 
operand: 


Opcode 

abc 

CMF 

100 

CNF 

101 

CMFE 

110 

CNFE 

111 


<i> should contain 0 to indicate that <Fm> is a 
floating point register, and 1 to indicate that 
<Fm> denotes a floating point constant. 

More untruths from the manual: Page 583 gives 
the syntax for the compares. Replace “op 
<cond>preccround> Fm, Fn” with the rather 
different “op<cond> Fn, (Fm #value)’\ 

Before I leave the subject altogether, in trying to 
decipher various manuals, I managed to get the 
debugger to disassemble “CDP” and “MCR” 
instructions (which use registers C 1 etc!). 
Further research (ARM Assembly language 
programming page 180+) shows that these are 
further co-processor instructions (i.e. non 
floating-point). I wonder what other co¬ 
processor emulators Acorn have up their 
sleeves? E3 
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Using the Debugger Module 


Gerald Fitton 

Introduction 

The Acorn Debugger is a Relocatable Module 
provided on disc for OS 0.2 and in ROM for OS 
1 2, Although the utilities it contains are most 
useful to the assembly language programmer, it 
is wrong to assume that the debugger module is 
of no value to the BASIC programmer. In these 
articles we shall have a look at a BASIC 
application or two which might be useful. 

For the assembly language programmer, one 
serious omission is the inability to modify 
machine code by entering an assembler 
mnemonic: you can enter only the machine code 
instruction as a hexadecimal number. Perhaps 
wc can provide a fix for that* Those of you who 
have followed my previous articles will know 
that I believe in writing self-contained functions 
and procedures. This sort of FN orPROC can be 
used as a building block for the construction of 
quite complex programs which can be built up in 
easy stages. Hopefully, youTl find something of 
use to you in this series of articles, even if you 
don’t want to do any debugging of assembler or 
machine code programs* 

The *Memory Command 

This command is available in three forms, to 
display memory, to disassemble a machine code 
program into its assembler mnemonics and a 
way of entering hex code into memory. This 
month we shall deal with the first form only and 
illustrate its use from within BASIC with a 
program called MemoryOI. 

Program Description 

This program uses the Debugger * Memory 
command to display a block of memory. 
However, from within the BASIC environment, 
it also allows the user to modify any byte of 


memory by entering the new value either as a 
printable character from the keyboard or a hexa¬ 
decimal code. With the parameter type$= M B ,r , 
the procedure PROCmemory, at line 500, will 
display at screen (text) co-ordinates (x%,y%) a 
block of memory of length=Iength% in bytes 
starting at start%. 

At line 110, die global variable start% is set to 
the start of the buffer declared in the previous 
line* There is a REM on line 210* You could 
insert a line here which loads a disc file into the 
buffer, use the program to modify it and then 
save die modified version (line 270)* 

To see what is in the disc file called “buffer”, a 
*DUMP is used at line 320. PROCmemory is 
called from within FNmodify at line 1370. 

The rest of the program, FN alter ASCII and 
FNchangehex, together with their respective 
PROCinserts, allow the user to change the 
contents of the buffer (or any other part of 
memory as we shall see) in either ASCII (print¬ 
able keyboard characters) or hex code (which 
can be unprintable - no comments from Ed, I 
hope!). There is a lot of duplication between 
FN alter ASCII and FNchangehex and drey 
could, no doubt, be combined into one function 
but the result would not have been as clear. 

What Can You Do With The Program? 

Having typed in the program, or loaded it off the 
Archive program disc, make sure you have a 
vers i on on dis c w h ich has LR at t ribu te s. 
<*ACCESS MEMORYOI LR<retum>) When 
you start playing with memory it is all too easy 
to crash the system or write not so funny things 
to disci 

With the version on the Archive program disc, 
when you run the program you will display a 256 
byte block of memory from &9FD4, which is the 


Archive April 1988 


33 









Using The Debugger Module 


start of the buffer. If you have typed it in 
yourself, then you might have an odd space here 
or there which will mean that buffer % is 
somewhere slightly different. In any case, what 
you see on the screen will be the 256 byte buffer 
located in memory at buffer%. Type in a few 
characters and then press <retum> to save the 
buffer to disc. Having got a buffer file you can 
now modify line 210 to read GSCLI( f1 *LOAD 
buffer M +STR$~{buffer%)):REM Loads buffer 
file to buffer%. When you run the program you 
may find that the buffer address has changed a 
little (but not if you type in 210 exactly as written 
above including the REM). 

Press <tab> to toggle between ASCII entry and 
hex entry, Y ou will notice that the position of the 
cursor changes to the hex part of the display. If 
you type in 41 then a letter A will appear in the 
ASCII section of the screen display. This is 
because die ASCII code for A is &41, You can 
move through the memory with the cursor 
(arrow) keys, or more rapidly by holding down 
die <shift> key at the same time as you tap the 
cursor keys (lines 680 and 1030). 

My printer is an Epson FX8Q+ and I like 
producing my listings in Elite (12 characters per 
inch) with a 10 character margin. Because my 
ribbon is a bit worn, I use double strike. The 
codes to be sent to the printer to produce this 
effect are 27,71,27,77,27,108,10 in decimal, 
or in hex IB, 47, 1B,4D, lB t 6C, 0A. RUN the 
program, press <shift> with the up cursor 
followed by <tab> and you should dien be at the 
start of the buffer (&9FD4) and in hex mode. 
Type in the hex codes “IB, 47, IB, 4D, IB, 6C, 
0A” then <tab> into the ASCII section and type 
a few words. Make sure the rest of die buffer is 
hex zeros, and then save the file by pressing 
<returns The program;- 
10 *FX 3,10 
20*PRINT buffer 
30*FX 3/0 
40END 


will send the buffer file to die printer complete 
with the “Escape” codes to produce double 
strike, Elite printing with a left margin of 10 
characters. It is probably a bit of an exaggeration 
to call such a buffer file a printer driver, and this 
program will never replace a good word 
processor, however Fm sure you can see the 
potential of the method. For example, instead of 
just a file editor, the buffer could be loaded and 
saved with the command SYS “ ADFS_DiscOp” 
and become a disc editor. Make sure you make 
die buffer large enough at line 90. 

Use [SYS ,, ADFS_DiseQp T \ , reason%, 
discaddress%,buffer%,buffersize% 
TO check%] 

The parameter reason1 to load from disc or 2 
to write to the disc; the parameter discaddress% 
is the address in bytes from the start of the disc. 

A Program Modifier 

I think I am a “Morning Person”, That’s why I 
work on recursive procedures (FNs or PROCs 
that call themselves) in the morning: it needs a 
clear head I Even harder are programs that 
modify their own code. Now 1 believe that self¬ 
modifying code is generally bad programming 
and, now that we have got beyond the stage of 
computers with more than 1 kbyte of memory, 
there is little excuse for such 'party tricks*. 
However, there are times, as we shall see, when 
self-modifying programs can come in useful. 

Once again, die memory locations to which I 
shall refer are for the version you can buy from 
Norwich Computer Services with buffer%= 
&9FD4. If you have a different value then you 
can add, or delete, a few spaces between a line 
number, command or REM; or you can do die 
sums (in hex) instead, BASIC stores the value of 
its variables straight after the end of the program. 

When I type in PRINT -TOP I get &9F5B: this 
is where the variables start. If you RUN the 
program and press the up cursor a few times you 
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will find a line at address &9F59 which contains 
the end-of-program marker (in hex) “OD FF”. 
This is followed by the name of the first variable 
(without its first letter) ess age?, and its value 
“Watch this space etc.”. Move the cursor to the 
part of die value where the full stops are and type 
in a few characters. Because the message? is 
printed every time a key is pressed (lines 780 or 
1130) you will see the result of your key presses 
near the bottom of the screen immediately. 
Perhaps more amusing is to type in a hex code 
such as 0D which moves the printing position to 
the beginning of the line or 0 A to print down one 
line. The value 0C (VDU 12) will clear the 
screen (a bit drastic?). 

Is your mind clear ready for the next bit? The 
value of message$ is refreshed by the program at 
line 230 every time the loop, lines 220 to 250, is 
executed. If you enter an ASCII letter or hex 
code or if you press die left or right cursors dien 
you will remain within FNmodify and so line 
230 is not executed. That is why you can 'poke' 
the value of message? and retain the modified 
value while it is printed by 780 or 1130. If you 
press <tab> or the up or down cursor then you 
exit FN modify and return to the 220 to 250 loop 
where 230 refreshes the value of message?. 

Now, if you poke the program, rather than the 
values of its store of variables, dien you will 
make more permanent changes. In my version, 
line 230 is found soon after memory location 
&9264 (don't get mixed up with line 80). If you 
alter a full stop to, say, the letter M you will find 
that 4D appears in the hex code but nothing is 
printed in the “Watch this space etc,” at the 
bottom of the screen. Now press <tub>to exit the 
FN modify loop and you will see the M appear at 
the bottom of the screen. Press <esc> and LIST 
line 230. You will find that you have modified 
the program and that M has appeared in line 230. 
Be careful not to wreck the disc copy of the 
program: you have been warned! 


For the Expert 

Do you want to try something more ambitious? 
OK, then you can use the program to change line 
1130 so that die ‘PROC* becomes a ‘REM 7 , The 
token (hex code) for PROC is F2 and that for 
REM is F4. RUN the program and use the cursor 
keys to move to memory location &9B43. Make 
sure you can recognise the location and (in hex 
mode) change the F2 to F4. Press <esc> and list 
line 1130. If yon change line 790 (at &979D) 
similarly then these two changes will stop the 
program printing the message? every time the 
value of message is "poked 7 . Now go forward to 
&9F6F, where the value of message? is stored, 
and change a few full stops: although the 
locations have been ‘poked 1 , the printing (lines 
780 and 1130) has been disabled by changing 
PROC to REM, so the display at the bottom of 
the screen does not change as it did before. 

So, you might ask, what use Is this potentially 
dangerous facility to modify a program whilst it 
is still running? Bear with me - Eve nearly got 
the re. We can sta y within the BASIC 
environment, within a program and use one part 
of the program to modify another part. Now 
consider the situation where the part we want to 
modify is written in assembly language 
mnemonics: we can run the BASIC compiler, 
look at the assembled code, call other Debugger 
functions (which is what this series is supposed 
to be about!) and even CALL the compiled 
program (provided it doesn't crash) all without 
leaving our original BASIC program. 

Well, that's enough for this month. Those of you 
who want to steal a march on next month's 
sequel can try *LOADing a machine code 
program into the buffer and disassembling the 
code by using die debugger memory command 
type$="I 11 . Try changing line 1370 to 
FROCmemory("I ",start%,&40,0, 3) 
as a start and I think you'll guess where we’re 
going. 
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Using The Debugger Module 


10 REM > MemoryOl 

20 REM Author :G L Fitton 

30 REM Copyright :ABACUS TRAINING 

40 REM Version 1.00:11th March 1988 

50 

60 ON ERROR FRGCerror 
70 MODE 3 

80 message$="Watch this space..,. 


90 buffersize%=&100 :REM Make sure 
you have enough 
100 DIM buffer! buffersize% 

i REM Reserve space In memory 
110 start% = buffer% : REM Start of 

display 

120 pos% = 61:REM Position of cursor 
130 vpos! - 11 :REM when altering 

memory in ASCII 

140 hpos! = (pos%-61)*3+11 :REM 

Position of cursor 
150 hvpos% = vpos% :REM when 

changing memory in hex 
160 display! = FALSE :REM Redisplay 
on screen when TRUE 
170 ascii% = TRUE :REM When making 

changes in ASCII 
180 step! = 1 :REM Size of step 

through memory. 

190 

200 PRGChelp 

210 REM *LOAD a file from disc to the 
buffer (see line 90 about size) 
220 REPEAT 

230 message$="Watch this space.... 


240 quit%=FNmodify : REM Modify 

bytes in memory. 

250 UNTIL quit%=TRUE 

260 REM Save the modified file to 

disc. 

270 OSCLI ( Tl * SAVE buffer " + STft$~ 

(buffer!) + n + ,, +STR$^ (buf fersize%) 

+ " 0 0 ") 

280 *5ETTYPE buffer &FFD 
290 *$TAMP buffer 
300 CLS 

310 PRINT ,f The file called"" 

buffer" 1 ' now contains:-" 
320 *DUMP buffer 
330 PRINT 


340 END 
350 

360 DEFPROCerror 
370 *FX 4,0 
380 CLS 
390 REPORT 

4 00 PRINT " at line °;ERL 

410 ENDPROC 

420 

430 DEF PROCprint(message$, x%, y%) 

440 REM Prints message at TAB(x%,y%) 
450 LOCAL 

460 PRINT TAB(x%, y %); 

470 PRINT messages; 

480 ENDPROC 
490 

500 DEF FROCmemory(type$,pstart%, 

lengths,x%,y%) 

510 REM Displays a block of memory. 
520 LOCAL commands 
530 PRINT TAB(x%,y%); 

540 commandS = T, Memory r, +typeS-^ T, " + 

STR$-£pstart%)+" +"+STR$~(length!) 
550 OSCLI(commands) 

560 ENDPROC 
57 0 

580 DEF FNalterASCII(RETURN pos%, 

RETURN vpos!) 

590 REM Lets user change the memory 


600 LOCAL key!,key$ 

610 REPEAT 

620 PRINT TAB(pos%,vpos%); 

630 REM Cursor keys take CHR? values 

640 *FX 4,1 

650 key%=GET 

660 *FX 4,0 

670 key$=CHR$(key%) 

680 IF INKEY(-1)—TRUE THEN step%-8 

ELSE step%=l 

690 IF key%>3l AND key%<127 THEN 
PROCinsertASCII(key%,pos% r vpos!) 
700 IF key%-136 THEN pos%-pos%-l 
710 IF key%=137 THEN pos!-pos%+l 

720 IF key%-l38 THEN start%=start% 

+16*step!:display%-TRUE 
730 IF key%-!3 9 THEN start%=start% 

-16*step%:display!=TRUE 
740 IF key%= 9 THEN ascii!-FALSE: 

diSplay%=TRUE 

750 IF key%= 13 THEN quit! -TRUE 

:display!=TRUE 
760 IF pos%=60 THEN pos%=76:start! 

=start%-16:display!=TRUE 
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Using The Debugger Module 


770 IF pos%=77 THEN pos%=6l:start* 


=start%+!6:display%=TKUE 
780 PROCprint[mes sage $,0,20) 

790 UNTIL display%=TRUE 
800 display%=FALSE 
810 «quit% 

820 

830 DEF PROCinsertASCII(key%,RETURN 
pos%,RETURN vpos%) 


840 REM Modifies the memory and 

prints to the screen, 
850 LOCAL key$,hex$ 

860 key$=CHR$<key%) 

870 hex$=RIGHT$ ( 11 00" +STR$~ (key%) ,2) 
880 7 (start% + &8Q+pos ! l“6l) =key% 

890 PRINT keyS;TAB (8+ £pos%-60)*3 

,vpos%);hex$? 

900 pos%=pos%+l 


910 ENDPROC 
920 


930 DEF FNchangehex(RETURN hpos%, 

RETURN hvpos%) 
940 REM Lets user change the memory 
950 LOCAL key%,key$ 

960 REPEAT 

970 PRINT TAB(hpos%,hvpoS%); 

980 REM Cursor keys take CHR$ value 

990 *FX 4,1 

1000 key%“GET 
1010 *FX 4,0 
1020 key$=CHR$(key!) 

1030 IF INKEY(-1) THEN step%=8 

ELSE step%=l 

104 0 IF INSTR ("012345678 9ABCDEF" 

,key$) THEN PRGCinserthex 
(keyS,hp o s %,hvpo s %) 
1050 IF key%=136 THENhpos%=hpos%-3 

1060 IF key%=137 THENhpos%=hpos%+3 

1070 IF key%=l38 THEN start%= 

Start%+I6*step% :display%=TRUE 
1080 IF key%-139 THEN start%= 

start%~l6* step%:display%=TRUE 
1090 IF key%=9 THEN ascii%=TRUE 

:dispiay%-TRUE 

1100 IF key% = 13 THEN quit%=TRUE 

:display%=TRUE 

1110 IF hpos%- 8 THEN hpos%=56 

: Start %- St art %-l 6 : display%=TRUE 
1120 IF hpos%=59 THEN hpos%=ll: 

start%=start%+l6:display%-TRUE 
1130 PROCprint(messages, 0,20) 

1140 UNTIL display%=TRUE 


1150 display%—FALSE 
1160 =quit% 

1170 

1180 DEF PROCinserthex(key1$,RETURN 
hpos%,RETURN hvpos%) 
1190 REM Modifies mem 1 y,prints screen 
1200 LOCAL key2$,hex$ 

1210 PRINT keyl$; 

1220 REPEAT 
1230 key2$=GET$ 

12 4 0 IF IN5TR ( n 012 345 67 89ABCDEF 1 ' 

,key2$)=0 THEN VDU 7 
1250 UNTIL INSTR ( M 012345678 9ABCDEF 11 

,key2$) 

1260 PRINT key2$ 

1270 hex$=keyl$+key2$ 

1280 hex%=EVAL [ n £ “ +hex$) 

1290 IF hex%>31 AND hex%<127 THEN 

char-$=CHR$ (hex%) ELSE char$-“.“ 
1300 PRINT TAB(60+(hpOS%-8)DIV3, 

vpos%);char$; 

1310 ?{start%+s80+(hpos%-ll)DIV3) 

—hex% 

1320 hpos%=hpos%+3 
1330 ENDPROC 
1340 

1350 DEF FNmodify 

1360 PROCprint(messages, 0,20) 

137 0 FROCmemory ( ,T B M , start %, &! 00,0, 0) 
1380 PROCprint(messages,0,20) 

1390 IF ascii%=TRUE THEN 

1400 pos%=(hpOS%-ll)DIV3+61 

1410 quit%=FNalterASCH (pos%,vpos%) 

1420 hpos%=(pOS%-6l)*3+11 

1430 ELSE 

1440 hpos%=(pos%-61)*3+11 
1450 quit%=FNchangehex(hpos% 

,hvpos%) 

1460 pos%={hpos%-ll)DIV3 + 61 
1470 ENDIF 
1480 =quit% 

1490 

1500 DEF PROChelp 

1510 PRINT TAB£0,21);“Press cursors 
to move through memory, 11 
1520 PRINT TAB(0,22);"Press <$hift> 
with cursors to move faster." 
1530 PRINT TAB(0,23);"Press <Tah> to 
toggle between ASCII and hex." 
1540 PRINT TAB (0,24) ; 11 Enter changes 
at cursor in ASCII or hex, "; 
1550 PRINT "Press return to finish."; 
1560 ENDPROC Q 
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The Acorn I/O Podule 

_. . . . . . . 'n . . ■ .■■ . ■ . . ■ f ; 


Brian Cowan 


In one way, the I/O podule may be regarded as 
part of the plan of up ward compatibility between 
BBC models; the Archimedes is very much a 
“BBC microcomputer”. Thus the operating 
system Arthur is essentially a superset of the old 
B and Master OS, Similarly, the advanced disc 
filing system and the implementation of BASIC 
are upwardly compatible with those of the 
earlier machines. There are limits however. The 
Archimedes BASIC V assembler is for ARM 
code; programs using 6502 assembly language 
will not run. Help is at hand here with the 6502 
emulator known as 65Arthur. Running this 
program the Archimedes emulates a BBC 
machine with a 6502 type processor. To be 
precise, the emulation is nearer that of a machine 
running a 65002 second processor. 

The I/O podule completes the exercise of 
imitation; it provides the inptEt/output facilities 
found on the earlier BBC microcomputers. Thus 
there is a user port, a 1MHz bus and an analogue 
input, all having the usual connectors. The 
peripheral module or “podule” is the means of 
hardware interfacing to the Archimedes. There 
is firmware support for up to sixteen podules, 
but provision for only four podules inside the 
400 series machines and two in the 300 series. 

The podules plug into a vertical backplane 
mounted in the Archimedes. A four slot 
backplane is provided as standard on the 400 
machines. This has two rows each with two side 
by side sockets. Thus up to four single width or 
two double width podules may be accomm¬ 
odated, or one double and two singles. 

For the 300 series Acorn supply a two slot 
backplane to be purchased as an extra together 
with a cooling fan. The two sockets are mounted 
one above the other so that two podules may be 


fitted, either single or double width, (Solidisk 
should be providing a four slot backplane like 
that of the 400 for the 300 series machines) 

The I/O podule is a double width unit. This is 
necessary because the back panel must 
accommodate the sockets for the user port, the 
1MHz bus and the analogue port. There is also 
provision for a MIDI interface upgrade, and to 
th is end there are two blanked off holes for DIN 
connectors on the panel, some empty he, sockets 
on the board together with plugs for a small extra 
board. The circuit board is thus somewhat wider 
than a single width board. 

ITiere is a 27128 16 kbyte ROM on the board. 
This contains the software for managing the 
podule. On powerup the contents of this ROM 
are read into the Archimedes memory and 
installed as a relocatable module. 

The User Port 

The user port hardware utilises the familiar 6502 
family VIA chip, although here it is the emos 
version, the 65C22. However, this is clocked at 
2MHz unlike the 6522 VIAs in the earlier BBCs 
which run at 1 MHz. While this doubling of 
speed will be advantageous in many applic¬ 
ations, it does mean that wherever timing is 
important, programs will need modification. 

Legal access to the user port is obtained using the 
OS BYTE calls 150 and 151 which comm¬ 
unicate with SHEILA. As expected, it is the B 
side of the VIA with the buffered output which 
provides the user port. On previous BBCs the A 
side of the VIA was used for the parallel printer 
port however this is provided directly by the 
Archimedes, The A port is used for other purp¬ 
oses and is not accessed as part of SHEILA’s 
area. Two lines of the A side, PA6 and P A7, are 
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used for the “fire” buttons for the joystick/ 
paddle, connected through the analogue port. 
(On the previous machines these lines went to 
the system VIA.) One line, PA5, remains 
unconnected while the remainder, lines PAO to 
PA4 are involved in paging the podule ROM. 

It is not possible for the entire podule ROM to be 
addressed directly. The Archimedes interface to 
podules incorporates twelve address lines 
allowing access to 4k locations. And although 
sixteen data lines are supported, the I/O podule 
only utilises eight; the unit of data is thus the 
byte. Eleven address lines directly address the 
ROM and the remaining line enables the ROM 
output. The 16 kbyte ROM is thus read as eight 
2 kbyte pages. (Actually the ROM contains only 
just over 1 kbyte of code!) The pages are selected 
by lines PAO, PA1 and PA2 of the VIA. The 
remaining lines PA3 and PA4 go to the ROM 
PGM and Vpp pins. 

The Analogue Port 

The analogue port is based on the same twelve 
bit digital to analogue converter as in previous 
BBC machines, the pPD7002. And again the 
reference is provided by the voltage drop of 
three forward biased silicon diodes. Thus 
compatibility is guaranteed, even the lack of 
reference stability(!) Serious users of the 
analogue port may wish to remove the three 
diodes and replace them with a band gap 
reference. In fully compatible fashion, legal 
access to the analogue port is via the usual 
OSBYTE calls or, using ADVAL from BASIC. 

The 1 MHz Bus 

Notwithstanding the fact that the user port 
clocks at 2MHz and that the Master Compact 
implements a 2MHz bus (as does the Master 
through its cartridge sockets), the I/O podule 
provides a true 1 MHz bus. The address lines and 
the data lines are buffered exactly as on the old 
BBCs and most other lines including JIM and 


FRED are provided. The exception is the 
interrupt lines IRQ and NMI. A jumperplug PL4 
is provided on the podule board enabling these 
lines to be connected to either of the Archimedes 
interrupt lines IRQ (interrupt request) or FIQ 
(fast interrupt request). Also, pin 16 does not 
provide an analogue input to the machine’s 
sound channel. Legal access is provided with 
OSBYTE 146 to 149 as expected. 

Peek and Poke 

Direct (although illegal) access to the podule 
facilities may be made since all I/O is memory 
mapped. However, this cannot be done from 
BASIC using indirection operators. The reason 
is that the podules sit in physical memory space 
and this cannot be accessed under normal 
operating conditions (ARM User Mode). Only 
logical addresses may be used, the translation 
being performed by the memory controller chip 
(MEMC). Physical memory, and hence the 
podule, may only be accessed in one of the 
privileged Supervisor Modes. This must be done 
using machine code. 

It is possible, however, from within a BASIC 
program to assemble some code which takes the 
machine into SVC mode, reads and/or writes to 
physical addresses and then returns to User 
mode. Such direct access should rarely be 
necessary except where maximum speed is 
required. Even when operating under the 6502 
emulator the old BBC addresses for SHEILA, 
JIM and FRED etc. do not apply since this is a 
“second processor” emulation; all 64 kbytes of 
memory refer to RAM. As with usual second 
processor operation, calls to the I/O devices 
using the OSBYTE calls are implemented 
correctly. 

Each podule occupies a given address space in 
the Archimedes memory map. However, 
different types of podule and different types of 
data transfer are mapped to different areas. The 
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I/O podule is classified as a ‘MEMCpoduIe’ and 
as such it connects directly to the memory 
controller (MEMC) chip of the machine. 
However some functions of the podule are really 
those of what is known as a 'simple podule’. 

Simple podules connect to the input/output 
controller (IOC) chip which handles data 
transfer using one of four cycle types. Of these 
it is the 4 synchronous transfer’ that Is used in the 
I/O podule. Simple podule (synchronous 
transfer) memory space maps to the podule 
ROM, the user port and the “fire” buttons. The 
1 MHz bus and the analogue to digital convener 
occupy MEMC podule space. The actual 
addresses are given in the I/O podule guide, 
although it is stressed that the absolute addresses 
may not apply to later machines. 

Fortunately, the I/O podule software provides an 
instruction which returns the physical location 
of the I/O podule in the memory map. This is the 
software interrupt SWI “I/0_Podule_ 
Hardware”. The SYS instruction may be used 
from BASIC, Using this instruction, software 
can control a podule in any socket since the base 
address may be read in and all locations indexed 
w ith respect to this. The base address is in fact 
the first location of the simple podule 
(synchronous) space. This is the start of the I/O 
podule ROM. It is rather silly that the I MHz bus, 
which is in MEMC podule space, sits below the 
base address. So negative indexing is required! 

The MIDI interface circuitry that is on the main 
I/O podule board is essentially a serial interface 
circuit. There is a socket for a 6850 serial chip 
with transmit and receive lines. The input is 
isolated with a 6N13S opto-coupler. With 
suitable software this could have some useful 
applications without using the extra MIDI 
board. - A solution to the RS423 saga and die 
troublesome 6551 chips? 


The 22 page guide which comes with the podule 
is just about adequate. There are descriptions of 
the various ports and mention of the 
incompatibilities with die old BBCs. The 
memory map is given together with a circuit 
diagram. A summary of the relevant OSBYTE 
calls is given, there are some example programs 
and a short index is provided. 

Conclusion 

The I/O podule does a good job in providing the 
usual BBC I/O facilities. Much of the circuitry is 
similar to the old BBCs and the podule provides 
the maximum possible in compatibility. 
Compatibility requires that even though the 
Archimedes is a 32 bit machine, and the podule 
data bus is 16 bits wide, the I/O podule operates 
on single bytes. For those not concerned with 
compatibility, or to supplement the Acom I/O 
podule, there should be a third party 16 bit 
podule available soon. RESOURCE are 
planning a “versatile interface podule” (VIP) 
with full 16 bit input and output. This will also 
incorporate two eight bit 100 kHz analogue to 
digital converters. 

Thanks to Tom Crane for help In preparing this 
review. 0 


* p 472. The name of the WIMP call at &400CE 
is “GctlconState” not “Getlconlnfo” 

User Guide Issue 2 

- Additional Change 

* p. 208 To enable the printer, use <ctrl-B>, 
not <ctrl-Break>! 0 


Errors 
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BBC to Archimedes Utility Programs 


Matthew Treagus 

The "BBC to ARM" utility disk (£15.95 from 
RESOURCE) contains several neat little 
conversion utilities including "BBCrun", a 
more complete version of 65Arthur as well as 
UDG’s (User Defined Graphics) Conversions, 
Picture Conversions and a Conversion Aid. 

BBCrun-The Emulator 

BBCrun is some 4k longer than 65 Arthur and is 
installed as a module and called with *BBCnin, 
The emulation is not of a 6502 Second Processor 
environment but of a BBC *B r I/O processor 
The following additional emulations have been 
made since 65Arthur 

*FX 234-detect TUBE 

*FX 154 - Video ULA (partial emulation) 

- Only turns cursor on and off 

VDU queue - Updates HIMEM after MODE 
changes 

Screen files - Screens can be *LOADed and 
*SAVEed in Modes 0, I t 2,4,5 and 7. 

UDG chars - Definitions are now stored in 
locations &C00-&CFF: 

&367-&37F - Locations emulated that contain 
font details and palette settings 

But such things as sideways RAM and ROM are 
not possible and the screen is still not memory 
mapped, so screen dumps and games software 
are still not possible. The break key and SOUND 
and ENVELOPE keywords are not emulated, 
nor are certain operating system vectors, e.g. the 
event vector. Other Master series features 
* SHADOW and modes > 7 are not emulated. 

DFS Emulation 

The DFS emulator within the BBCrun emulator 
allows ADFS directories to act as DFS drives. 


The directories (drives) of programs must first 
be “flattened" to set up the internal DFS 
directories that are attached to the ADFS 
filenames, this is done using the 'Makedisk 1 
utility. Then the LINKs must be setup, i.e. 

*LINFC 0 DRO 

*LINK 1 Pics 

Sets DFS drive 0 to be represented by ADFS 
directory ‘DRO* and drive 1 to be 'Pics’. The 
*DRIVE n command is then used to change the 
drive, temporary access using :n is also possible 
and *LIB drives can also be used. OS ARGS and 
OSGBPB are also supported to an extent and the 
catalogue is maintained at &E00 so in fact the 
DFS workspace is also emulated to a degree. 
Thus, certain ‘naughty’ packages can be run. 

The emulator works very well but unfortunately 
is only a partial emulation, *INFO for example 
is unsupported as is * TITLE these commands 
still perform their ADFS functions. Once a disk/ 
dir has been converted for use with the BBCrun 
it makes a bit of a mess of the filenames and 
conversion back to ADFS is not an easy job - 
you have been warned! 

BBCscan 

BBCscan simply asks for a BASIC filename and 
then proceeds to search the BASIC file for any 
possible problems. These are then displayed on 
screen or sent to a printer. A line number, 
message reference and message text are 
returned at problem lines. The message 
reference can then be looked up in the manual for 
hints on conversion, e.g. 101 / 32 / Softkeys 

Tliis means that at line 101 reference 32 there is 
a problem with *$AVEing softkeys. The 
manual provided the comment “needs 
conversion” but other comments were slightly 
more useful! 
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Picconv 

This simply converts BBC 6502 ’•‘SAVED 
screens into sprite files for ^SCREEN 
LOADing. MODE7 files need to be *PRINTed 
from the original program. Picconv also allows 
conversion of GXR sprites created using the 
Acorn GXR ROM or the Master into Arch¬ 
imedes Sprites. 

UdgConv 

Converts character definitions into VDU 23 
statements as a file that can be APPENDed to 
BASIC programs or *EXECed that set up the 
characters in the native ARM mode. 

Conclusion 

The ‘BBC to ARM’ package is a major step 
forward for BBC emulation. It is by no means a 
complete emulation (although a touch better 
than the Master/BBC compatibility, well 
almost!) 1 would like to see a complete BBC 
system emulation and I would have thought one 
would not be too far away hopefully containing: 

OSWORD &7F emulation. Fully memory 
mapped screen, 16 Socket Sideways Ram 
including service ROMs and possibly certain 
add-ons like a 2nd Processor and Shadow 
Screens and then ultimately all of this on a ROM 
with possibly the 6502 chip and all this on a 
network too. (I don’t ask much!) 

This is very useful program for anyone wanting 
to convert BBC programs but especially so for 
inexperienced programmers and schools who do 
not have the knowledge or the time to spend 
converting programs. If you are going to be 
doing any conversions then my advice would be 
to go out and buy it straight away. 

For further information try the Acorn 
Applications Note “Archimedes 6502 Emul¬ 
ation 034001 1“ from Customer Support Dept, at 
Acom’s Fulboum Road address. 

“£2.50/note, subject to availability” Q 


_ DROOM! 

Tim Beverley 

The aim of the game is to help 1 lenry the frog to 
get out of the spell which the dreaded dragon, 
Droom cast upon him. You see, Henry is not 
really a frog - he is a prince, and if you can help 
him he will be able to turn back into a prince. 

You must seek out the dreaded dragon, Droom. 
But that is not all, he also carried Princess 
Arminda away and has chained her in his 
dungeon. If you can free her, she will change 
Henry back into a prince by kissing on his little 
green cheek. Little Bit will help you too. You 
will need to visit the Wizard. I le is always happy 
to see you close to tea-time. The Witch hates the 
dragon and she will give you all the help she can. 
The Fairies are your friends. Droom eats fairies 
for breakfast. Everyone hates Droom. 

My favourite game is Crossing the Floor; you 
have to find a path which is cool because if you 
go onto a hot square you go back to the start and 
every time you do the game there is a different 
pattern. I think the program is really GREAT. 

Dad’s comments 

Droom is not just a game (or rather a series of 
games) it is a suite of educational material which 
can be used to support the development of 
mathematical concepts - binary, xy-co-ord-inates, 
pattern matching - and to aid logical thinking and 
memorising sequences. Sounds really boring, 
doesn’t it!?! It’s not though - it’s a fun game for all 
the family. When Sue gets on it, I can’t get my 
Archimedes back even if I say I need it for work! 

For £18.95 + VAT you get the main DROOM disc 
(which, on its own, keeps my two quiet, or I should 
say occupied, for hours) plus a disc of supp¬ 
lementary exercises on each of the different topics, 
a manual to tell the teacher how to use Droom to the 
best advantage in the classroom and a book which 
gives the kids “The story so far...”. If you think 
education should be fun then Droom is for you.Q 
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5.25 Disk Interface. 


Fit a 5.25 Drive to your Machine the safe and easy way using our 
NEW DISK INTERFACE 

♦ Available Now + Fully Buffered 

♦ No Soldering + Easy to Fit 

♦ Supports 4 Drives * All Cables Supplied 

♦ Low Power Consumption ♦ Full Instructions 

In Stock Now and Despatched the same day on receipt of your 
Cheque / Postal Order for £27.95 inc P & P 



30 Hadley Close, Netherton, Dudley, West Mids. DY2 9JX 


Tel: (0384) 633142 


Font Designer 



Design your own 8x8 BBC-fonts for 
the Archimedes. Fully mouse driven 
software. Price includes comprehensive 
manual and 15 different sample fonts, 
including scientific symbols, all of 
which can be "mixed and 
matched* as required. 

Price 
£ 8.95 




To: APL Software, 7 Ascendalc, Deeping St James, Peterborough, PE6 8NZ. 

Please supply one copy of Font Designer. I enclose a cheque/postal order for £8.95 


Name: 


Address: 
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Which ROM Podule? 

.... 


Having tried out both the two currently available 
ROM podule s, here are our findings... 

Capacity 

Both podules have 8 ROM slots one of which is 
taken up with a manager ROM (and yon need 
one manager per board even if you put in 
multiple ROM boards). Computer Concepts' 
podule can have RAM or ROM in any of the 
remaining 7 slots whereas on the Acorn board, 
only two of the sockets can have RAM in them 
and they only mention 32k RAM chips whereas 
Computer Concepts say you can put 128k static 
RAMs in when they get down to a sensible price. 

Ease of setting up 

In terms of setting up the hardware, the 
Computer Concepts board has one link per 
ROM to decide whether the battery backup 
supply should be applied to it whereas the Acorn 
board has two links for each ROM which have to 
be set in order to determine what si^e of ROM or 
ROM is to be used in that socket. Then to set up 
the software, with the A com board you have to 
do a Configure ROMboard” for each slot to 
specify what type of ROM or RAM it contains 
whereas the Computer Concepts board has a 
*AUTOCGNFIGURE command which looks 
at each slot in turn, finds out what is in it and 
configures it accordingly. 

Mutual compattbiiity 

I f you have both a Computer Concepts board and 
an Acorn board in the machine, you will find that 
the Computer Concepts software (*RFS) allows 
you to access the A com board, but that the Acorn 
software (*RQM) does not recognise that the 
Computer Concepts ROM board exists. 

Data transfer speed 

The Computer Concepts board can load and 
save at around 300 kbytes per second whereas 


the Acom board is more like 30 kbytes per 
second which is only about twice the speed of the 
ADFS 3,5” disc. Unfortunately even if you 
access the Acorn board through the RFS 
software of the Computer Concepts board, the 
access time is no better. (Computer Concepts 
quoted 300 kbytes per second for their board and 
75 kbytes per second for the Acom board, but I 
timed it at about 30.) 

These timings are not exact because a ‘feature* 
of die podule manager on the 1.2 OS is that it 
doesn't update the system clock during access to 
the podules so that you cannot use TIME, 
TIME$ or *TIME. It doesn't actually stop the 
hardware clock, but to get *T1 ME and TTM E$ to 
catch up with the hardware clock you have to do 
a cctrl-breakx So if you are using an application 
which does a Jot of podule access you will find 
that the clock runs slow! I guess that this applies 
to the I/O board as well, but since you are not 
accessing large chunks of information at a time, 
the effect is probably too small to matter. The 
same problem affects the sound system. If you 
want some very funny sounds, try: 

VDU7 : REM make a bleep 

FOR N%“1T01G 

*LOAD ROM:filename 10000 

NEXT 

Battery backup 

Yon can buy the Computer Concepts board with 
battery backup installed but although die Acom 
board has space for the battery, all they do is tell 
you the parts needed and how to fit it, including 
what kind of soldering iron to use! They do also 
say that “your Acom dealer should be able to 
assist you in obtaining these items". They also 
say, of course, that fitting the battery backup 
invalidates your guarantee! 
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BASIC Cross-Referencer 




Brian Carroll 

The idea of this program is to provide you with 
a list of die names of all the procedures, 
functions and variables you have used and the 
numbers of all the lines on which they are 
referrenced. The program also provides an 
optional printout of the information. 

Setting up 

First of all, alter the printer set-up procedure at 
the end of the program to suit your printer and 
save the modified program to disc. 

Hie program asks for the filename of the 
program to be tested and it loads die program 
into a buffer. For large programs, you may need 
to increase the size of the buffer (line 170). If the 
buffer is too small, you will get an ‘Address 
exception 1 error. (You may also need to increase 
die size of reflist% at line 180.) 

10 REM >XREF 

20 REM ************************* 

30 : 

40 REM Copyright: J,A.Hall 1984, 

B.Carroll 1984 & 1988. 

50 : 

60 REM Originally written for BBC 
micro; now Improved & adapted for 
Archimedes by B.Carroll; Feb 38. 
Prestel Mailbox; 025222539. 


70 : 

80 REM XREF reads a BASIC file 
from disc and produces a sorted 
list of all the FROCs, FNs & 
variables and the line nos, 
of each occurrence. 

90 : 

100 REM Acknowledgement is due to 
THE BBC MIC GUIDE by G,Blackwell 
for tree-handling PROCs 1 do T , 

* left r right f and 'compare 1 . 

110 : 

120 REM Alter codes in PRGCset_ 

printer {at the end) to suit 
your printer. 

130 ; 

140 REM *************************** 
150 MODE 7:save_at%=@% 

160 P ROC s et_o n_e rr o r 

170 bufsize%=lG24*24;REM Space for 

program {24K} 

180 DIM buffer% bufsize%,refIist% 

( 19 - 99 , 1 ) 

190 DIM name$(999) f nr% (999), 

nl% (9 9.9) , refp% {999} , currl {999) 

200 s 

210 PROCfrontpage 
220 PROCclear 
230 ; 

240 PRINTTAB {0,2)CHR$ (131) "Insert 

new disc now, if necessary" 
250 PROCclear 


(Continuedform opposite page...) 

Availability 

Here’s die problem. At the moment the 
Computer Concepts ROM podules are in very 
short supply whereas the Acorn podules are 
"off-the-shelf*. 

Cost 

The VAT inclusive prices, through Archive, are: 
Acorn’s board (no battery backup) £63, 
Computer Concepts's board £53 without and 
£63 with battery backup. 


Conclusion 

Sorry, Acorn, but the facts speak for themselves! 
The only reason 1 can see for anyone buying die 
Acom board is if they have to have one NOW 
and cannot wait for supplies of the Computer 
Concepts board. 

(We are accepting orders for Computer 
Concepts ROM podules on the basis that we hold 
the cheques but do not bank them and supply the 
podules in strict rotation as we receive them 
from C.C.) Q 
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260 *MOUNT 0 
270 *DIR $ 

260 PRINTTAB £0,2)CHR$(131)"Enter 

FULL path & file name" 
290 ON;PRINTTAB(3,4)">>> 

INPUTLINE ""file$ :GFF 
300 PROCioad(fiie$) 

310 CDS 
320 : 

330 PROCanalyse 
340 : 

350 PRINTTAB (0 , 16 )CHR$ (132) CHR$ (157) 

CHR$(131 ); 

360 PRINT ,T Do you want hard copy 

(y/N) ? 11 ; 

370 G%=0:*FX15,1 

360 ON:REPEAT:G%=(GET AND &DF):UNTIL 
G%=89 OR G%=78:CLS:PROCsound:OFF 
3 90 IF G%=89 AND FNtest_printer 

0 FALSE PROCwarn("FRINTER NOT 
READY ! n ) :GOTO350 

400 *FX21,3 

410 IF G%=8 9 PRINTTAB(0,16)CHRS (132) 
CHR$(157)CHR$(131); 
420 IF G%-89 PRINTSPC10 T, P r 1 n t 

i n g";5PCl0;:VDU2 
430 IF G%=78 PRINTTAB(0 f 16)CHR$(132) 
CHRS(157)CHRS(131); 
440 IF G%=78 PRINT" Press SHIFT to 

scroll screen :VDUl4 

450 VDU28,0,21,39,7 
460 PROCsetprinter 
470 PROCprinthdg 
480 : 

490 @%=G:PROCoutput(0) 

500 IF G% = 89 VDUl,13,1,13:FGR Z%=0 

TO 74:VDU1,95,:NEXT:VDUl,12,3 
510 VDU28,0,23,39,7:REM Change window 
520 : 

530 PRINTTAB(0,16)CHR$ (132)CHR$(157) 

CHR$(131); 

540 PRINT" Do you want to repeat 

(Y/N)? :PROCsound 

550 G%=0:*FX15,1 

560 ON : REPEAT :G%= (GET AND &DF):UNTIL 
G%=8 9 OR G%—7 8:PROCsound: OFF 
570 IF G%=89 VDUl5:GOT0350 
580 PRINTTAB [0,16)CHR$ (132)CHR$ 

(157)CHR$(131)" Finished" 

;SPC15; 

590 : 

600 VDUl,27,1,64,3,15,26: REM Exit 

point, tidy up 


610 ON: @%=save_at% :: CLOSE# 0 : 

ON ERROR OFF 

620 END 
630 : 

640 REM *************************** 
650 : 

660 DEFPROCanalyse 

670 namecount%=0:]inecount%=0: 

linetotal%=-l 

680 K%"-1:@%=5 

690 nr%(0)=-l:nl% (0)=-1:lineNo%=-1 
700 PRINTTAB(0,12)CHR$(132) 

CHRS(157)CHRS(131) ; 
710 PRINT" Processing lines 

."CHR$ (15 6)CHR$ (12 9) 

CHR$(136)"WAIT!" 

720 VDU 28,3,15,32,9 
730 byte%=FNfetch 

740 IF byte%<>!3 THEN PRINT"Missing 
'START LINE 1 ":GOTO730 

750 ass%=FALSE 
760 : 

770 REPEAT:REM Outer loop. Read 

each line of BASIC program 
being examined 

780 linetotal%+-l;REM Count lines 

examined 

790 hibyt£%=FNfetch 

800 IF hibyte%>254 GOTO1370: 

REM EXIT from outer 
loop, 'cos . , 

810 lobyte%=FNfetch:REM ... T TOP * 

(:fcFF=255) found 

820 lineNo%=hibyte%*256+lobyte% 

830 PRINT lineNo%; 

840 linelen%=FNfetch 

850 IFlinelen%=4 GOTOl350:REM 

Empty line, so skip it 
860 inquotes%=FALSE:ignore%=FALSE 
870 var_ident%=FAL5E:hex%=FAL$E 
880 start%=TRUE:bytecount%=0 
890 proc£=FALSE:funct%=FALSE 
900 : 

910 REPEAT:REM Inner loop. Read 

rest of line 

920 bytecount%+=l 
930 byte%=FNfetch 
940 IF bytecount%=linelen%-3 

AND byte%<>l3 PRINTCHRS(129) 
"Missing <CR>":GOTO 930 
950 IF start% AND byte%=32 GOTO 

1330 :REM Ignore initial spaces 
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960 

970 

980 

990 

1000 

1010 

1020 

1030 

1040 

1050 

1060 

1070 

1080 

1090 

1100 

1110 

1120 

1130 

1140 

1150 

1160 

1170 

1180 

1190 


IE 1 start%ANDbyte%=42 ignore % 
=TRUE:REM Ignore 05 calls 
IF byte%=£F4 ignore%=TRUE: 

REM Token &F4 = 'REM' 
IF byte%=&DC ignore%=TRUE: 

REM Token &DC = 'DATA' 
IF ignore% GGT0133O:REM 

Skip if 'ignore' set 
IF byte%-34 inquotes% 

=(WOT inquotes%) 
IF inquotes% GOT0133O:REM 

Skip literal string 
IF byte%=&F-2 proc%=TRUE ; 

REM Token &F2 = 'PROC 
IF byte%=&A4 funct%=TRUE: 

REM Token &A4 = 'FunctioN 1 
IF byte%=58 start %=TRUE:REM 
Re-start at colon separator 
IF byte%-91 ass%=TRUE:REM 

[ = start assembler 
IF byte%=93 ass£=FALSE:REM 

] = end assembler 
IF ass% AND NOT var_ident% 

GOTO 1330: REM Skip 
assembler mnemonics 
IF var_ident% GOTG1230:REM 

JUMP,- start of a label 
IF byte%-38 hex%—TRUE:GOTQ 

1330:REM &=hex identifier 
IF hex% AND £byte%<48 OR 

(byte%>57 AND byte%<65) OR 
byte%>70) hex%=FALSE: 
REM Not a valid hex digit 
IF byte%<>&8D GQTO1140:REM 

&8D not a token, so ... 
FOR 2%=1 TO 3:byte%=FNfetch 

: NEXT 

bytecount%+=3:GOTO1330:REM 

« . . discard 3 bytes 
IF byte%<64 OR (byte%>90 AND 
byte%<95) OR byte%>122 
GOTOI330:REM Invalid 
variable character 
IFhex% GOTOl330:REM Hex number 
starting 

var_ident%- true: REM So 

what 1 s left must be a... 
label$-CHR$(byte%): REM ... 

var, PROC or FN name 
IF proc% label$="*FR M + 

label$:proc%=FALSE:REM Add 
ident for PROC name 


1200 IF funet% label$=*'*FN ,f + 

label$:funct%=FALSE; REM Add 
ident for FN name 

1210 GOTO 1330 
1220 : 

1230 IF byte%=36 OR byte%=37 PROC 
build:REM Add var-type 
ident, % or $ 
1240 IF (byte%>64 AND byte%<9l) OR 
(byte%>94 AND byte%<!23) OR 
(byte%>47 AND byte%<58) 
PRGCbuild:GOTOl330 
1250 var_ident%=FALSE:REM End of 

label if not A-2, a-z, 
0-9, _ or # 

1260 : 

1270 REM Search name table to see 
if already there 

1260 match%=FALSE 

1290 IF namecount%=G name$(0)- 

label? ELSE FROCcompare(0) 

:REM Add No. to list 
1300 IF NOT match% np%=namecount% 
1310 FROCadd(lineNo%) 

1320 IF NOT match% namecount%+=l 

1330 UNTIL bytecount%=linelen%-3: 

REM i*e. until whole of line 
cheeked 

1340 : 

1350 UNTIL FALSE 
1360 : 

1370 VDU28,0,23,39,7 

1380 PRINTTAB(0,12)CHR$(132) 

CHR$(157)CHR$(131) ; 
1390 PRINT" Number of lines read is" 
GHRS(129)linetotal% 
,T PROC sound 

1400 PROCclear 
1410 ENDPROC 
1420 : 

1430 DEFPROCbuild 
1440 label$+=CHR$(byte%) 

1450 ENDPROC 
1460 : 

1470 DEFPROCcompare(N%) 

1480 IF label$=name$<N%> np%=N%: 

match%=TRUE:ENDPROC 
1490 IF label$<name$ (N%) PROCleft(N%) 
ELSE PROCright(N%) 

1500 ENDPROC 
1510 : 
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1520 DEFPRQCleft(N%) 

1530 IF nl%(N%)=-l nl%(N%)=namecount% 
:name$(namecount%)=label$:nl% 
(namiecount^) =-l :nr% (namecount%) =-1 
ELSE P ROC comp a. re [nl% (N%) } 
1540 ENDPROC 
1550 : 

1560 DEFFROCright {11%) 

1570 IF nr%(N%)=-l nr%(N%)=namecount% 
:name$ (namecounts) = 1 abe 1 $:nll 
(name count %) =-l :nr% (namecount%) *=-l 
ELSE FRGCcompare(nr%(N%)) 
1580 ENDPROC 
1590 : 

1600 DEFFRGCadd(lineNo%) 

1610 reflist%(linecount%,0)=lineNc% 
1620 reflis f t% (linecount%, 1) =-l 
1630 IF match% reflist%(curr%(np%) 

,1)=linecount% ELSE refp%(np%) 
=linecount% 

1640 curr%tnp%)=linecoant% 

1650 1inecount%+=l 
1660 ENDPROC 
1670 : 

1680 DEFFROCprintJidg 
1690 VDUl,14,1,27,1,45,1,1:REM Double 
width, underline on 
1700 PRINT " CROS S -REFERENCE LIST" T 
1710 PRINT TIME?; 11 . Path/file name: 

H file$ 

172 0 VDUl,27, 1,45,1,0:REM U'line off 
1730 PRINT' 

1740 VDUl,27,1,45,1,I:REM U'line on 
1750 PRINT "FN/PRQC/VAR" ; 

17 60 VDUl,27,1, 45,1,0:REM U'line Off 
1770 PRINTSPC6; 

178 0 VDUl,27,1,45,1,1:REM U'line on 
1790 PRINTLINE NUMBERS" 

1800 VDUl,27,1,45,1,0:REM U'line off 
1810 ENDPROC 
1820 : 

1830 DEFPRQCoutput(N%) 

1840 IF nl% (N%> 0-1 PROCoutput (nl% 

m)) 

1850 PROCprint_table (N%) 

1860 IF nr%(N%)<>-l PRQCoutput(nr% 

„ (N%) ) 

1870 ENDPROC 

1880 ; 

1B 30 DEFPRQCprint_table(N%) 

1900 len%=LEN(name$(N%)) 

1910 IF ien%>15 THEN name$(N%>=LEFT$ 
(name$ (N%) ,14) + ">" : len%=15 
1920 PRINT'name$(N%);SPC{15-len%); 


1330 next%-refp%(N%) 

1940 num%=0 
1950 REPEAT 

1960 lineNo%=reflist %[next%,0) 

1970 next%-reflist%(next%, 1) 

1980 PRINT lineMo%; 

1990 num%=num%+l 

2000 IF num% MOD 10=0 AND next%<> 
-1 PRINT'$FC(15); 

2010 UNTIL next%=-l 
2020 ENDPROC 
2030 : 

2040 DEFFNfetch:K%=K%+1:=buffer%?K% 
2050 : 

2060 DEFPROCload(fS) 

2070 LOCAL L%,:L%=0 
2080 chan%=OPENIN(fS) 

2090 PRINTTAB{0,12)CHRS(132)CHR$ 

(157)CHR$(131) ; 

2100 PRINT" Reading file to buffer 

. . , . "CHRS (156) CURS (129) 
CHR$ (136)"WAIT!" 
2110 WHILE NOT EOF#chan% 

2120 buffer%?L%=BGET#chan% 

2130 L% + = 1 

2140 ENDWHILE 
2150 CLOSE#chaji% 

2160 ENDPROC 
2170 : 

2180 DEFPROCfrontpage 

2190 title$ = T, CROSS REFERENCE for the 

Archimedes" 

2200 authS=" (0 1984, John Hall & 

Brian Carroll" 
2210 PRINTTAB(0,1)CHR$(132)CHR$(157) 
2220 PRINTTAB (0, 2)CHR$(131}CHR$(157) 
CHRS(132)CHRS(141)titles 
2230 PRINTTAB (0 ,3)CHR$(131)CHR$(157) 
CHRS(132)CHR$(141)title$ 
22 40 PRINTTAB (0,4)CHRS (132)CHRS(157) 
2250 PRINTTAB(0,5)CHR$(132)CHR$(157) 

CHRS(131)authS 

2260 PRINTTAB(0,6)CHR$(132)CHR$(157) 

2270 VDU28,0,23,39,7 

2280 PRINTTAB(0,2)CHR$(130)"This 

utility provides a listing of all" 
2290 PRINTCHRS(130)"the variables, 

procedures and functions"; 
2300 PRINTCHRS (130) "in any BASIC 

program (read as a file)," 
2310 PRINTCHRS(130)"together with 

the line number of each" 
2320 PRINTCHRS(130)"occurrence," 
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2330 PRINTTAB(0,8)CHR$(130)"Names are 
listed in alphabetical order" 
2340 FRINTCHR$(130)" (upper case 

first, then lower case)," 
2350 PRINTTAB(0,11)CHR$(130)"Names 

longer than 10 characters are" 
2360 PR1NTCHR$(130)"truncated and 

marked with 1 > 1 ," 

2370 ENDPROC 
2380 : 

2390 DEFPROCsound:SOUND1,-1,100,1 

:ENDPROC 

2400 : 

2410 DEFPROCset_on_error 
2420 ON ERROR IF ERR=17 GOTO600 ELSE 
IF ERR=&D 6 OR ERR=£DE OR ERR=&CC 
GOTO2440 ELSE GGTO2450 

2430 ENDPROC 

2440 CLS:VDU7:PROCwarn("FILE NAME 

PROBLEM! '■) :PROCc 1 ear: GOT0240 
2450 VDU7,12,26:@%=0:REPORT:PRINT" @ 
line "ERL:GOTO600 

2460 : 

2470 DEFPROGclear 
2480 *FX 15,1 

2490 ON:PRINTTAB(0,16)CHR$(132)CHR$ 
(157) CHR$ (131); 
2500 PRINT" Press any key to 

continue " ,- : G%=GET: VDU12 : PROCsound 
2510 OFF:ENDPROC 
2520 : 

2530 DEFFROCwarn(m$) 

254 0 PRINTTAB (7,5) CHR$ (141) CHRS (13 6) m$ 
2550 PRINTTAB(7,6)CHR$(141)CHRS(136) 

m$:VDU7 

2560 ENDPROC 
2570 : 

2580 DEFFNtest_printer 
2590 *FX21,3 

2 600 VDU2,1,0,1, 0,1,0,1,0,1,0,l f 0, 

1,0,3 

2610 TIME=Q:REPEAT UNTIL TIME>30 
2620 IF ADVAL(-4)=63 =TRUE ELSE 

=FALSE 

2630 : 

2640 DEFPROCset_printer:REM Set up 

for CANON PW1080A 
2650 VDUl,27,1,64,1,27,1,40:REM 

Reset, NLQ 

2660 VDUl,27,1,106,1,5,1,27,1,78,1 

,10:REM LM 5, perf, skip 10 
2670 ENDPROC £J 


• : 






More about 
Brainsoft 


Mark Seafey 


Archive has in the past looked at various 
methods of transferring files from 525 " format 
to the Archimedes ADFS 3.5 M disks. One such is 
the Transfer Software supplied with a lead from 
Brainsoft at £14 inclusive of VAT andp & p. An 
earlier release was indeed reviewed in Archive 
Vol 1 number 3, 

Since then Brainsoft has sent some five or six 
disks each slightly better than its predecessor. A 
final version has been evaluated for this review, 
found to work well and to contain some 
additional features. This update can be obtained 
by sending back older disks to Brainsoft with an 
address label and 56p worth of stamps. One of 
the things you get when you do is an enlarged 
though still rather scrappy manual. 

It now does work — with no need for patches - 
with die 1,2 Operating System, It is possible to 
transfer much larger files than previously; 
indeed there is claimed to be no limit to their 
size. It is also possible to configure the suite for 
acceptable error rates, 1 found that it worked 
well when set for zero errors. Most importantly, 
perhaps, is that it will work with both DFS and 
ADFS format at the BBC end. The suite will 
automatically attempt to set the correct Filetype 
for a transferred program's new environment. 

Into the bargain, Brainsoft have produced an 
Editor for use by those wishing to write source 
code in any of the batch of compiled languages 
produced so far by Acorn. An example in 
Fortran comes with the program, which is 
booted from Brainsoft's own version of the 
Desktop. It has one or two pleasing features 
being mouse and icon-control led for most of the 
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main functions. Block manipulation is also 
achieved by the three mouse buttons. 

It does not claim to be highly sophisticated but 
can work with two text files open at once and in 
separate windows. There is search and replace 
and merge as well as an indication of space used 
so far and a facility to number your code for 
easier debugging. 

Brainsoft have here a product that is possibly 
overdesigned; a fully blown wimp interface for 
something that really does relatively little. Yet if 
you want an alternative to TWIN at under a third 
of the price with a maximum of 5000 lines 
capacity (though it is claimed that files can be 
linked: I did not try tills), it ! s well worth 
considering. You would be well advised to exit 
from the suite Legally as it temporarily 
configures the Archimedes into all sorts of nasty 
options. The Editor without the Transfer Utility 
Lead costs £13 and with the lead £ 19.83 


'OSReadVdu Variables' - SW1 &31 

This call allows you to access all sorts of useful 
variables, in any order you wish. Each variable 
has a number assigned to it, all you have to do is 
produce a list of variable numbers and the call 
will supply the corresponding values (see the 
example program). Here is a list of the variables 
you can access: 

Var no: Value ami meaning 

Screen mode information 
(this is the important stuff) 

0 bitO =0 graphics mode 

-l non-graphics mode 
bit I =0 non-teletext mode 
=1 teletext mode 
bit2 =0 non-gap mode 

-1 gap mode (i.e. gaps between text) 

1 number of text columns minus one 

2 number of text rows minus one 

3 n umbe r o f co 1 ou rs ava i 1 able mi nu s one 


Program 
Subscriptions? 

We have been asked if we will do subscriptions 
for the program discs but I don’t really think that, 
with the work involved, it would be possible to 
reduce the cost. What we can do though is to 
allow you to order several discs at a time, i.e. 
including discs not yet published. What we 
would then do would be to prepare the sticky 
address labels and mark them all with die issue 
numbers to be sent out. You would just have to 
keep a note of which ones you had ordered so 
that you knew when to re-order. 

The other idea we are looking into is setting up 
an Archive Bulletin Board from which, once you 
have paid the subscription, you would be able to 
down-load the programs free of charge. El 



Adrian Look squeezed this article in at the 

last minute 1 Sorry , Adrian!) 

Writing directly to die screen on other Acorn 
machines was frowned upon, although many 
programs did so (mainly games). This was done 
for extra speed in processing graphics or to 
create special effects. As a result, the programs 
lost their compatibility. Acorn have decided, 
however, that they would support direct screen 
accessing on the Archimedes(!) but the prog¬ 
rammer must follow certain ground rules. If you 
don’t do so then your programs may not work on 
subsequent machines. The "Riles’ that should be 
followed are more of a help to the programmer 
than a hindrance. Basically, all the programmer 
has to do is use the screen data provided by an OS 
call, rather than assuming it. That way his 
routines will always End the screen location and 
format - no matter what! 
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4 number of pixels =0 1280 pixels 

=1 640 pixels 

=2 320 pixels 

=3 160 pixels 

148 screen start address used by VDU drivers 

149 screen start address used by hardware 

150 size of configured screen memory 
161 highest mode available 

Graphics window co-ordinates (in) 

128 leftx 

129 bottom y 

130 right x 

131 top y 

Text window co-ordinates (in) 

132 leftx 

133 bottom y 

134 right x 

135 topy 

Graphics origin (ex) 

136 x co-ordinate 

137 y co-ordinate 

Graphics cursor position (ex) 

138 x co-ord 

139 y co-ord 

Graphics cursor position (in) 

144 x co-ord 

145 y co-ord 

Graphics colour information 

151 GCOL action for foreground colour 

152 GCOL action for background colour 

153 foreground colour 

154 background colour 

157 foreground tint colour 

158 background tint colour 

Text colour information 

155 fo reground colour 

156 background colour 

159 foreground tint colour 

160 background tint colour 


10 REM >$.5crnData 
20 : 

30 REM *************************** 
40 REM * Reading VDU variables * 
50 REM * written by Adrian Look * 
60 REM * 27th March 1986 * 

70 REM *************************** 
B0 : 

90 DIM block £400 

100 DIM block out% £400 
110 offset=0 
120 : 

130 var_no=0 

14 0 WHILE var_noo-l 

150 INPUT "Which variable £-1 to 

terminate);"var = no 
160 block_in%loffset=var_no 
170 offsett=4 
180 ENDWHILE 
190 : 

200 SYS "OSReadVduVariables", 

block in% # block out% 
210 : - - 

220 FOR value=0 TO offset-8 STEP 4 
230 varval=blockout%!value 
240 PRINTvarval 
250 NEXT 
260 END 

l OS_ReadModeVariables 1 -SWI &35 

This call will allow you to read the variables 0- 
4 of any mode (as listed above), without 
changing mode. For example: 
mode=12 
var_no=l 

SYS M OS_ReadMode Variables 11 , 
mode,var_no TO ,,var_value 
PRINT var^yalue 

Next month* I shall describe some more SWI 
calls related to the graphics. These will include 
reading and setting the palette in a 256 -colour 
mode — complete with editor . Q 



if you would like to insert small ad’s, free of 
charge , send them to us. Each should be less than 
30 (thirty) words long and should relate to 
Archimedes and associated devices, ie. no 
adverts for old BBC B T s and Masters! 0 
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*HELP Archive 


What are its aims? — Archive is a subscription 
magazine for users of the Acom Archimedes 
range of computers, which aims (1) to provide 
information to the user (2) to provide a forum in 
which we can all share ideas (3) to give the 
benefit of bulk buying of software (4) to allow 
software and hardware vendors to advertise 
their wares. 

Is it a User Group? - No, but 1 would like it to 
have a “User Group feel” - like BEEBUG when 
it first started - except that Norwich Computer 
Services has to earn a living from the magazine 
- hence the order form overleaf. 

However, Sue and I are not in this business to 
make lots of money; we enjoy the work we do 
and it’s very satisfying to be able to provide a 
useful service. We only ask to make enough 
money to live on plus a bit to give away and then 
we’ll be happy. (I hope it doesn’t sound too trite, 
because it’s true.) 

HELP! - Could you help us, please, to make 
Archive a success? We don’t have the muscle or 
the financial budget of the big magazines and 
cannot afford to do a vast amount of advertising, 
so, if you think Archive is good, please take out 
a full subscription (if you have not already done 
so) and recommend the magazine to a friend or 
two. If you want any more information sheets 
and subscription forms, please let us know. 

Can we answer technical enquiries by phone? 

As much as we would like to continue the policy 
we have always had of being available to answer 
all your technical enquiries by phone, we felt 
that if we were not careful, we would be so 
inundated with calls that we would not have time 
to get the information out to you through the 
magazine. For that reason, we have introduced 
the Technical Help Service so that those who 


really need the instant access to help can 
purchase it. (£8 per year.) I hope you will bear 
with us and, if you do not feel it is worth the extra 
£8, please send your enquiries by post. 

Do we take Access or Visa? No, I’m afraid not 
- mainly because of the high percentage that we 
would have to pay for the privilege (I think it’s 
6% when you first start). The other reason is that 
we have always had a policy of sending goods 
out by return of post, whenever possible, 
regardless of whether the cheques have cleared 
through the bank. The way we see it is that if you 
trust us by sending a cheque without the Access 
guarantee, it is reasonable for us to trust you by 
sending out the goods without waiting for the 
cheque to clear. Perhaps we are foolish to take 
the risk, but we have only had two dud cheques 
in three years of full time trading. 

Those who help us... Although there’s only 
two of us here, we are surrounded by a lot of 
people who help us in various ways, some 
voluntarily and some professionally, without 
whom we would not be able to stay in business. 
I don’t think it is appropriate to mention them all 
by name, but I would just like to assure them that 
we are really grateful to them all. However, as I 
have said in most of my previous publications, 
as a committed Christian, there is One Person 
who never fails us and without whom we would 
achieve nothing worthwhile. God supplies all 
our needs, and we thank and praise Him! 

I hope you find Archive interesting and 
informative and that you will feel able to 
contribute your own ideas, hints and tips or even 
full articles. I’m afraid that we can’t afford to pay 
vast sums for articles, but at least you’d auto¬ 
matically become an “HLMTHS”. Honorary 
Life Member, Technical Help Service! 

Thanks again, 

‘ PaJ UPP 
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4Mation 

Linden Lea, Rock Park, Barnstaple, EX33 9AQ. (0271 - 45566) 

ACE Computing 

A PL Software 

27 Victoria Road, Cambridge, CB4 3BW. (0223 - 322559) 

7 Ascendale, Deeping Si James, Peterborough, PE6 8NZ* 


Brainsoft 22 Baker Street, London, W1M IDF. (01 - 486 - 0321) 

CCD Computer Services 71 Marlborough Park Avenue, Sidcup, Kent, DA 15 9DL, (01 - 302 - 
5427) 

CJB Micros 78 Brighton Road, Worthing, W Sussex, BN11 2EN. (0903 - 213361) 

Clares Micro Supplies 98 Mkldlewich Road, Rudheath, Northwich, Cheshire, CW9 7DA. 
(0606-48511) 

Computer Concepts Gaddesden Place, Hemel Hempstead, Herts, HP2 6EX, (0442 - 63933) 
Contex Computing 15 Woodlands Close, Copie, Bedford, MK44 3l)E. (02303 - 347) 
Dudley Micro Services 30 Hadley Close, Netherton, Dudley, DY2 9JX + (0384 - 633142) 

EMR Ltd 14 Mount Close, Wickford, Essex, SS11 8HG. (0702 - 335747) 


Fairhurst Instruments 

GEM Electronics 
HopeSoft 

Dean Court, Woodford Road, Wilmslow, SK9 2LT. (0625 - 525 - 694) 
17 Tandragee Road, Portadown, Craigavon, BT62 3BQ. 

Hope Cottage, Winterbourne, Newbury, Berks, RG16 8BB. (0635 — 
248472) 

HS Software 

IFEL 

LTS Ltd 

56, Hendrefolian Avenue, Sketty, Swansea, SA2 7NB. (0792-204519) 
36 Upland Drive, Plymouth, Devon, PL6 6BD, (07555 -7286) 

Haydon House, Alcester Road, Studley, Warks, B80 7AN, 

(0386 -792617) 

MacSoft 

36 Alfred Street, Dunstable, Beds. (0582-699-483) 

Maximum 

Minerva Systems 

Mitre Software 

44 Manor Road, Wokingham, Berks, RGI1 4AR. 

69 Si dwell Street, Exeter, EX4 6PH. (0392-37756) 

26 Creechurch Lane, London, EC3A 5BA, (01 -283 -4646) 


Musbury Consultants 8 Fairhill, Helmshore, Rossendale, Lancs, BB4 4JX. (0706 - 216701) 
Northern Educational Software 16 Dawson Lane, Bierley, Bradford, BD4 6HN. 

Pineapple Software 39 Brownlea Gardens, Seven Kings, Ilford, Essex, IG3 9NL. 
(01-599-1476) 

RESOURCE Exeter Road, Doncaster, DN2 4PY. (0302 - 63800/63784) 

Solidisk Technology Ltd 17 Sweyne Avenue, Southend-on-Sea, Essex, SS2 6JQ. (0702-354674) 

Norwich Computer Services 18 Mile End Road, Norwich, NR4 7QY. (0603 - 507057) 
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/\rchive 


The Subscription Magazine for Archimedes users 


Articles include: 

• File transfer on RS423 

• Attaching a 5.25" drive 

• C.C.’s ROM-Link packages 

• Clares’ Toolkit module 

• Graphics demo programs 

• Archie the Music Computer 

• Structuring with BASIC V 

• Technical notes on BASIC V 

• Help with using the ADFS 

• Epson Screen Dump 

• Using BBC ROM images 

• BBC micro as an I/O podule 

• Assembly language programming 

• Writing relocatable modules 

• Using the WIMP environment 

• Reviews of software and hardware 


Technical Help Service (£8/year) 

A telephone hot-line service for 
immediate help with your technical 
problems. Any member can send 
written enquiries, but for a fast 
response use the THS! 

Members’ Discount: 7.5% off 
software from Computer Concepts, 
Minerva Systems and Clares Micros 
Supplies purchased through Norwich 
Computer Services. 

Subscription: 12 issues £12.50 (UK) 
Europe £18, Middle East £22, 
America / Africa £25, Elsewhere £27. 
Technical Help Service £8 


Archimedes is a trademark of Acom Computers Ltd, 


* Please send copies of Archive magazine for one year starting from 

Volume 1 Issue_ 

* Please enrol me on the Technical Help Service for one year. (£8) 

I enclose a cheque for £_ 

Name: 


Address: 



Postcode: 


Norwich Computer Services, 18 Mile End Road, Norwich, NR4 7QY . 

Subscription - £10 per year, Technical Help Service - £8 per year 




















